VB问题:如何使按一下command1使窗体2显示,再按一下使它隐藏?

Private Sub Command1_Click()
Form2.Visible = Not Form2.Visible
End Sub
前提是Form2的Visible为False
楼上的太麻烦了!

Private Sub Command1_Click()
If Form2.Visible = False Then
Form2.Visible = True
Else
Form2.Hide
End If
End Sub
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
End
End Sub

Dim i
Private Sub Command1_Click()
If i = 1 Then
i = ""
Form2.Hide
Exit Sub
End If

If i = "" Then
i = 1
Form2.Show
Exit Sub
End If
End Sub

——————————
创建两个窗体，form1,form2。form1里添加一个按扭command1，把上面的代码复制粘贴form1，就ok

哦，忘了，先要载入load form2
然后form2.show是显出
form2.hide是隐藏