Filter
Top Products
PMCS Interface Toolkit Creating Floor Plans, Elevation Views, and One-Line Diagrams • 53
Sub Main()
Dim Brkr1S As New Point
Dim Brkr2S As New Point
Dim Brkr3S As New Point
Dim Brkr4S As New Point
Dim Brkr5S As New Point
Dim Brkr6S As New Point
Brkr1S.id = "BRKR1_S"
Brkr2S.id = "BRKR2_S"
Brkr3S.id = "BRKR3_S"
Brkr4S.id = "BRKR4_S"
Brkr5S.id = "BRKR5_S"
Brkr6S.id = "BRKR6_S"
Brkr1S.get
Brkr2S.get
Brkr3S.get
Brkr4S.get
Brkr5S.get
Brkr6S.get
Dim brk1 As Boolean
Dim brk2 As Boolean
Dim brk3 As Boolean
Dim brk4 As Boolean
Dim brk5 As Boolean
Dim brk6 As Boolean
brk1 = false
brk2 = false
brk3 = false
brk4 = false
brk5 = false
brk6 = false
If (Brkr1S.value = 3) Then