展开全部
新建两个窗体form1和form2
在两个窗体中各加一个命令按钮commnad1;
在form1下的command1中编辑命令 form2.show
在form2下的command1中编辑命令 unload me 或unload form2
运行后:
点击form1下的command1,弹出form2窗体;
点击form2下的command1,关闭form2窗体;
在两个窗体中各加一个命令按钮commnad1;
在form1下的command1中编辑命令 form2.show
在form2下的command1中编辑命令 unload me 或unload form2
运行后:
点击form1下的command1,弹出form2窗体;
点击form2下的command1,关闭form2窗体;
追问
答的不是我想要的
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
简单!!
代码如下:
Private Sub Command1_Click()
If Command1.Caption = "打开" Then
Form2.Show
Command1.Caption = "关闭"
Else
Form2.Hide
Command1.Caption = "打开"
End If
End Sub
Private Sub Form_Load()
Command1.Caption = "打开"
End Sub
这不就是在同一个按钮实现打开与关闭吗 ??
代码如下:
Private Sub Command1_Click()
If Command1.Caption = "打开" Then
Form2.Show
Command1.Caption = "关闭"
Else
Form2.Hide
Command1.Caption = "打开"
End If
End Sub
Private Sub Form_Load()
Command1.Caption = "打开"
End Sub
这不就是在同一个按钮实现打开与关闭吗 ??
追问
不是我想要的效果~我希望是打开和关闭都是同个按钮你做到了~可是把我的按键名改了~而且点击第一下没反映~第二下才正常
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2011-03-16
展开全部
If Form2.Visible = True Then
Form2.Hide()
Else
Form2.Show()
End If
Form2.Hide()
Else
Form2.Show()
End If
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询