判断vb窗体是否隐藏

来源：百度知道 编辑：UC知道 时间：2024/06/20 17:30:06
就是下执行代码前判断一个窗体是否隐藏，若隐藏了则关了Form1显示Form2，若没隐藏则Form2显示！2个窗体是Form1和Form2,我不知道怎么判断一个窗体是否隐藏的，下面是代码
If Form1.Hide Then
Form2.Show
Unload Form1
ElseIf Form1.Show Then
Form2.Show
End If

form.visible属性

若隐藏了则关了Form1显示Form2，若没隐藏则Form2显示
..隐不隐藏你都要显示form2? 那又何必去判断呢？

Private Sub Command1_Click()
If Form2.Hide = True Then '判断的对象是 form2窗体2 如果被隐藏 则卸载窗体1.显示窗体2
Unload Form1
Form2.Show
Else
End If
End Sub

If Form1.Visible Then Unload Form1
Form2.Show