brk1 = true End If
If (Brkr2S.value = 3) Then brk2 = true
End If
If (Brkr3S.value = 3) Then brk3 = true
End If
If (Brkr4S.value = 3) Then brk4 = true
End If
If (Brkr5S.value = 3) Then brk5 = true
End If
If (Brkr6S.value = 3) Then brk6 = true
End If
Dim Bus1 As New Point
Dim Bus2 As New Point
Dim Bus3 As New Point
Dim Bus4 As New Point
Dim Bus5 As New Point
Dim Bus6 As New Point
Dim Bus7 As New Point
Bus1.id = "BUS1"
Bus2.id = "BUS2"
Bus3.id = "BUS3"
Bus4.id = "BUS4"
Bus5.id = "BUS5"
Bus6.id = "BUS6"
Bus7.id = "BUS7"
Bus1.Get
Bus2.Get
Bus3.Get
Bus4.Get
Bus5.Get
54 ∙ Creating Floor Plans, Elevation Views, and | PMCS Interface Toolkit |
