Question

VB 求指导：一个命令按钮如何控制多个label的可见与不可见？

命令按钮名称：command1

label是个控件数组：从label1（0）到label1（35）
要求是：按下command1，label1 数组都不可见；再按下command1，label1数组都可见。
谢谢！

Answer 1

Private Sub Command1_Click()
    Static Falg As Boolean
    Dim I  As Long
    Label1.Item(2).Visible = False
    For I = 0 To 35
        Label1(I).Visible = Falg
    Next
    Falg = Not Falg
End Sub

Answer 2

Private Sub Command1_Click()
Dim i As Long
For i = 0 To 35
Label1(i).Visible = Not Label1(i).Visible
Next
End Sub