Change6 = 1
ElseIf (Not Change6) Then Bus6.value = 0
End If
If ((Bus5.value) And (brk6)) Then Bus7.value = 1
Change7 = 1
ElseIf (Not Change7) Then Bus7.value = 0
End If
If ((Bus7.value) And (brk6)) Then Bus5.value = 1
Change5 = 1
ElseIf (Not Change5) Then Bus5.value = 0
End If
If ((Bus6.value) And (brk5)) Then Bus3.value = 1
Change3 = 1
ElseIf (Not Change3) Then Bus3.value = 0
End If
If ((Bus5.value) And (brk4)) Then Bus4.value = 1
Change4 = 1
ElseIf (Not Change4) Then Bus4.value = 0
End If
If ((Bus4.value) And (brk3)) Then Bus3.value = 1
Change3 = 1
ElseIf (Not Change3) Then Bus3.value = 0
56 ∙ Creating Floor Plans, Elevation Views, and | PMCS Interface Toolkit |