第1个回答 推荐于2016-01-25
form2中添加一button按钮，代码为
Private Sub Command1_Click()
Unload Me
End Sub
就行了吧，
或者添加一button按钮，把其属性cancel改为true，运行按esc就退出了本回答被提问者采纳
Private Sub Command1_Click()
Unload Me
End Sub
就行了吧，
或者添加一button按钮，把其属性cancel改为true，运行按esc就退出了本回答被提问者采纳
第2个回答 2019-08-09
在窗口里加上这个代码就可以了
Private
Sub
Form_Unload(Cancel
As
Integer)
Dim
l
As
Integer
l
=
MsgBox("确认关闭?",
vbYesNo
+
vbQuestion,
"确认")
If
l
=
vbNo
Then
Cancel
=
True
End
If
End
Sub
Private
Sub
Form_Unload(Cancel
As
Integer)
Dim
l
As
Integer
l
=
MsgBox("确认关闭?",
vbYesNo
+
vbQuestion,
"确认")
If
l
=
vbNo
Then
Cancel
=
True
End
If
End
Sub
第3个回答 2019-07-30
form2.show
vbNormalFocus
这里错了，好像不能加vbNormalFocus，当然会错了。form2.show
vbNormalFocus
这里错了，好像不能加vbNormalFocus，当然会错了。form2.show
第4个回答 2020-04-14
打开：form1.show
关闭：form1.hide或unload
me
关闭：form1.hide或unload
me
第5个回答 2019-07-13
“ Form1的command1中输入代码
form2.show
vbNormalFocus 在Form1的command1中输入代码
unload
me
报错”报错。没有呀
form2.show
vbNormalFocus 在Form1的command1中输入代码
unload
me
报错”报错。没有呀
相似回答
