关闭系统前，如何得到提示以便进行一些操作？

[xsFeng]

关闭系统前，如何得到提示以便进行一些操作？

[luzufu]

查看是否有另外没有关闭的窗口，记录集是否关闭，连接方式是否断开，内存和cpu是否还是被这个程序占着。得到相应的信息，关闭就可以了。

[yoki]

在主窗体的unload事件中加入代码


Private Sub Form_Unload(Cancel As Integer)
msgbox "你的提示"
Set form1 = Nothing
End Sub

[pandengzhe]

如果是关闭windows，如下：

每个窗体都有QueryUnload事件。如果这个事件被激发时unloadmode参数为vbAppWindows时，就说明Windows要关闭。你可以在这个事件里加入自己的代码。不过你的程序必须一直运行着，因为如果你的程序不是正在运行，Windows在退出时不会自动调用你的程序。