防止关闭表格

Question

如果错误地点击交叉,我怎么能避免关闭表格

Answer 1

在Form的QueryUnload事件中处理它.有一个UnloadMode参数和一个取消参数:

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)

    If UnloadMode = vbFormControlMenu Then Cancel = True

End Sub

有关QueryUnload事件的详细信息,请参阅MSDN VB6语言参考或查看本文.