Question

vb 点击窗体Form1 右上角“X” 使窗体关闭 的代码是什么，

使关闭的窗体 再显示 的代码是什么。

Answer 1

可以让他关闭扰坦不了

Private Sub Form_Unload(Cancel As Integer)
Cancel = 1
End Sub

也可以碰李没让他隐藏，笑纳form1.hide

Answer 2

在事件FORM_UNLOAD中写入下面代碧神码
if msgbox("确定要悔镇亏退出吗旅此?",vbyesno)=vbyes then
end
else
cancel=1
endif

Answer 3

unload form1
form1.show

Answer 4

unload form1