摘要： 如果不想取消卸载操作，最终抛出Unload事件。使得用户有最后一次机会阻止窗体的关闭。大多数情况下.应该利用这次机会提醒用户保存数据:Dim Saved As Boolean’定义一个... 如果不想取消卸载操作，最终抛出Unload事件。使得用户有最后一次机会阻止窗体的
关闭。大多数情况下.应该利用这次机会提醒用户保存数据:
Dim Saved As Boolean’定义一个模块级变且
Private Sub Formes Unload(Cancel As Integer)
If Not Saved Then
MsgBox "Please save data first!"
Cancel-True
End If
End Sub
5.2.3.10 Excel VBA窗体的GetFocus和LostFocus事件
这些事件概念上来说非常简单，GotFocus事件就是当一个控件获得输入焦点时发生，而LostFocus事件是当输入热点离开控件转入另一个控件时发生。初一看，这些事件用于实现一系列的确认操作很理想，也就是说检查区域内容和提示用户输入值不正确的代码片断.实际E，这些事件的次序受到一些因素的制约，包括MsgBox和DoEve
