简单问题，如何调用 Form_Unload 在线等待

[JonyChen2003]

请问如何在一个按钮中实现调用 Form_Unload 函数。谢谢！

我是刚学VB的，所以还请各位帮忙

Private Sub Command1_Click()
Form_Unload
End Sub

Public Sub Form_Unload(Cancel As Integer)
......
......

CloseCQXMapInfoConnection

......
......
End Sub


结果出错！

[northwolves]

Private Sub Command1_Click()
Form_Unload 0 '(1)
End Sub

Private Sub Form_Unload(Cancel As Integer)
MsgBox "确认退出？": End
End Sub

[strongfisher]

Private Sub Command1_Click()
unload me
End Sub

或
Private Sub Command1_Click()
unload form1
End Sub

[射天狼]

同意strongfisher(Haiwolf) ,卸载窗口自动就调用此过程了~~

[lwm1977]

建议另加一函数

[viena]

同意楼上。要么用unload me,要么另加一函数，分别在Form_Unload中和Command1_Click中调用，否容易造成混乱

[viena]

Form_Unload(Cancel As Integer)明明是有参数的，Cancel表示是否取消卸载窗体，调用这个sub为什么不加参数？

[kmzs]

Private Sub Command1_Click()
Form_Unload 0 '(1)
End Sub

Private Sub Form_Unload(Cancel As Integer)
a=MsgBox "确认退出？"，35
if a=6 then End else cancel=1
End Sub

[aiur2000]

unloade me

[NotReady]

unload me

[Reker熊]

unload

[yunfeng007]

Private Sub Command1_Click()
unload me
End Sub

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
If MsgBox("真的退出吗?", vbQuestion + vbYesNo) = vbYes Then
Cancel = False
Else
Cancel = True
End If
End Sub

[qiqunet]

可能楼主中不过是想调用一下Form_Unload()这个子程序,而不是想退出,那么就不能用
unload me 或 unload formX
而要用
Form_Unload 0 或 Form_Unload 1 或 call Form_Unload(0)

[cloudtarget]

不明白楼主的意思
把Form_Unload 中做的事情做成一个过程或函数，在Form_Unload 中可以调用，在按钮事件中也可以调用

[zz124]

在关闭窗口的时候就会自动调用Form_Unload事件，
或者
Private Sub Command1_Click()
unload me
End Sub

[MSSQL]

说来说去。
也不知道楼主问的是什么了。
不过。如果关闭窗口用unload me就行了
在窗口关闭时会触发sub form_unload()
在这里面你可以写你要处理的程序代码。

[lijinqiang]

UNLOAD ME

[wxrwan]

Private Sub Command1_Click()
unload me
End Sub

[Gelim]

Private Sub Command1_Click()
unload me
End Sub

[mooowx]

100分问这么基础的问题,你太大方了.答案只有一个: Unload me.
学VB,先掌握一些内部函数,会更易上手.

[Jackile]

Unload me后会自动调用Form_Unload