VB6,窗体1里怎么打开窗体2关闭窗体1?
我窗体1按钮代码是form2.showunloadme点击按钮后,可以调出form2但是关闭不了form1(把me换成form1也不行)窗体2也有一个功能相同的按钮,也是...
我窗体1按钮代码是
form2.show
unload me
点击按钮后,可以调出form2但是关闭不了form1(把me换成form1也不行)
窗体2也有一个功能相同的按钮,也是只能调出窗体1不能测底关闭窗体2。要怎么解决·?可以给个代码吗?用end就全部退出了,不想使用这个,就要重新进入程序,不好用。
再问下,怎么可以测底结束excel进程? 展开
form2.show
unload me
点击按钮后,可以调出form2但是关闭不了form1(把me换成form1也不行)
窗体2也有一个功能相同的按钮,也是只能调出窗体1不能测底关闭窗体2。要怎么解决·?可以给个代码吗?用end就全部退出了,不想使用这个,就要重新进入程序,不好用。
再问下,怎么可以测底结束excel进程? 展开
2个回答
展开全部
这是因为你的Form1的Unload事件中设置了Cancel = True,这样就把所有关闭Form1的操作(包括点击窗体右上角叉叉以及Unload Me)都自动取消了
这种情况下,就不应该使用Form_Unload事件,要改用Form_QueryUnload事件:
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Cancel = UnloadMode = 0
End Sub
这样就既能实现点击叉叉不退出,又能实现点击按钮执行Unload Me能够退出的目的。
这种情况下,就不应该使用Form_Unload事件,要改用Form_QueryUnload事件:
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Cancel = UnloadMode = 0
End Sub
这样就既能实现点击叉叉不退出,又能实现点击按钮执行Unload Me能够退出的目的。
追问
我刚刚有个问题,发布了,没法直接邀请您回答,可不可以请您帮忙再看看。非常感谢!
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询