请求信息: vb6应用程序退出过程（内部中断后的工作过程）

QueryUnload事件

在关闭表单或应用程序之前发生. 当关闭MDIForm对象时，QueryUnload事件首先以MDI形式发生，然后以所有MDI子形式发生. 如果没有任何形式可以取消QueryUnload事件，则Unload事件首先以其他所有形式发生，然后以MDI形式发生. 关闭子窗体或Form对象后，该窗体中的QueryUnload事件将在窗体的Unload事件之前发生.

语法

PrivateSubForm_QueryUnload（cancelAsInteger，unloadmodeAsInteger）

PrivateSubMDIForm_QueryUnload（cancelAsInteger，unloadmodeAsInteger）

QueryUnload事件语法包括以下部分:

部分描述

取消整数. 将此参数设置为0以外的任何值都可以在所有加载的表单中停止QueryUnload事件，并防止表单和应用程序关闭.

unloadmode一个值或一个常数，如返回值中所述，它指示QueryUnload事件的原因.

返回值

unloadmode参数返回以下值:

常数值描述

vbFormControlMenu0用户从窗体的“控制”菜单中选择“关闭”命令.

vbFormCode1Unload语句由代码调用.

vbAppWindows2当前的Microsoft Windows操作环境会话结束.

vbAppTaskManager3Microsoft Windows任务管理器正在关闭应用程序.

vbFormMDIForm4MDI子窗体正在关闭，因为MDI窗体正在关闭.

vbFormOwner5因为该表单的所有者正在关闭，所以该表单也在关闭.

这些常量在对象浏览器的Visual Basic（VB）对象库中列出.

说明

此事件的典型用法是在关闭应用程序之前，确保应用程序中包含的表单中没有未完成的任务. 例如，如果尚未保存表单中的新数据vb窗口关闭程序，则应用程序将提示您保存数据.

关闭应用程序后，可以使用QueryUnload或Unload事件过程将Cancel属性设置为True，以防止关闭过程. 但是，QueryUnload事件会在所有表单都被卸载之前在所有表单中发生，并且在每种表单都被卸载时会发生Unload.

.........三楼，这来自vb6的帮助...

卸载事件

从屏幕上删除表单时发生. 重新加载该窗体后，将重新初始化其所有控件的内容. 当使用“控制”菜单中的“关闭”命令或“卸载”语句关闭窗口时，将触发此事件.

语法

PrivateSubobject_Unload（cancelAsInteger）

卸载事件语法包括以下部分:

部分描述

Object一个对象表达式，其值是“适用于”列表中的一个对象.

取消一个整数，该整数用于确定是否从屏幕上删除了表单. 如果cancel为0，则删除表格. 将cancel设置为任何非零值，以防止删除表单.

说明

将cancel设置为任何非零值以防止删除该窗体，但是它不能防止其他事件vb窗口关闭程序，例如从Microsoft Windows操作环境中退出. QueryUnload事件可用于防止退出Windows.

当表单被卸载时，可以使用Unload事件过程来确认是应卸载表单还是用于指定所需的操作. 您还可以包括关闭表单或将数据存储在文件中时可能需要的所有验证码.

QueryUnload事件在Unload事件之前发生. 卸载事件发生在终止事件之前.

使用Unload语句或在表单的“控制”菜单上选择“关闭”命令，使用“任务窗口”列表上的“结束任务”按钮退出应用程序，并将当前表单用作子窗体如果关闭MDI窗体或在应用程序运行时退出Microsoft Windows操作环境，则可以触发Unload事件.

本文来自电脑杂谈，转载请注明本文网址：
https://www.pc-fly.com/a/ruanjian/article-183952-1.html