Unload Form1 与 Set Form1 = Nothing 有什么区别?

[lzheng2001]

Unload Form1 与 Set Form1 = Nothing 有什么区别?

[lv1]

我不知道form能不能nothing,不过对其他对象的,比如ado中的cnn的两者的区别就是
cnn.close是好比把一个水管给关了,但它以后还能用
set cnn=nothing是好比把水管直接拆了,以后想用就要自己装!

[lzheng2001]

楼上的说得对, 但cnn.close与 unload 的性质是不同的!

[上官云峰]

unload form 是卸载窗体
set form1=nothing
以便释放其所使用的内存和资源。最经常被忽略的引用是这个隐藏的全局窗体变量。


Visual Basic 窗体的存活期


由于窗体和控件是可见的，所以它们与其它对象的存活期不同。例如，即使释放了对窗体的所有引用，也不会关闭该窗体。Visual Basic 维护整个工程所有窗体的全局集合，只有当窗体卸载时才能从集合中删除该窗体。

同样的，Visual Basic 为每个窗体维护一个控件集合。可以从控件数组中加载或卸载控件，但简单地释放对控件的所有引用并不能撤消它。

详细信息 有关窗体和控件集合的内容已在本章的“Visual Basic 中的集合”中以作了讨论。

Visual Basic 窗体经历的状态
通常地，Visual Basic 窗体在整个存活期中有四种状态：

创建，但不加载。


加载，但不显示。


显示。


内存和资源完全收回。
在一定环境下，窗体可有第五种状态：当其中有一个控件仍被引用时，窗体处于卸载和未引用状态。

本主题将描述这些状态及状态之间的转换。

创建，但不加载
Initialize 事件是该状态开始的标志。因而，放在 Form_Initialize 事件过程中的代码，就是窗体创建时最先执行的代码。

处于这种状态时，窗体是作为一个对象而存在，但还没有窗口。而且它的控件也不存在。虽然该状态可能很短暂，但任何窗体都要经过该状态。

例如，如果执行 Form1.Show，则窗体被创建，Form_Initialize 开始执行；一旦 Form_Initialize 执行完毕，该窗体被加载，这是下一个状态。

在指定窗体为启动对象时会发生同样的过程。在“工程”菜单中，选取“工程属性”对话框，然后选定“通用”选项卡，就可以指定一个窗体为启动对象。一旦窗体被指定为启动对象，该窗体在工程启动时就被创建，并立即加载和显示。

注意 正如下面描述的，通过调用窗体的 Show，或使用内置的属性和方法，都可以从 Form_Initialize 中加载窗体。

保持创建，但不加载的状态
相反的，以下的代码创建 Form1 的实例，但不让其进入加载状态：

Dim frm As Form1
Set frm = New Form1

一旦 Form_Initialize 结束，在不强制加载窗体的情况下，所能执行的过程只有能添加到该窗体代码窗口的 Sub、Function 和 Property 过程。例如，可以给 Form1 添加以下的方法：

Public Sub ANewMethod()
Debug.Print "Executing ANewMethod"
End Sub

使用变量 frm（也就是 frm.ANewMethod），可以在窗体不强制进入下一状态的情况下调用该方法。同样的，可以调用 ANewMethod 创建窗体：

Dim frm As New Form1
frm.ANewMethod

由于 frm 声明为 As New，所以直到代码中首次使用该变量之前，上述情况是调用 ANewMethod，该窗体不能创建。上面的代码执行后，该窗体保持在已创建状态，但没有加载。

注意 只要运行 Form1.ANewMethod，无需声明窗体变量，也可以达到上述示例的效果。正如“定制窗体类”中所解释的，Visual Basic 为每一个窗体类创建一个隐含的全局变量。该变量名和类名相同，这可想象为 Visual Basic 进行了 Public Form1 As New Form1 声明。

可以在不加载窗体的情况下，任意运行定制的属性和方法。然而，一旦访问了窗体内置的任一属性或控件，该窗体就进入下一状态。

注意 把一个窗体分为两部分是非常有用的，一部分是代码部分，另一部分是可视部分。窗体加载前，只有代码部分在内存中。这样，可以不加载窗体的可视部分，而在代码中任意调用过程。

所有窗体都需经过的唯一状态
创建完毕但未加载，是所有窗体都需经过的唯一状态。如果上述示例中变量 frm 被设置为 Nothing，则该窗体在进入下一状态前就撤消了：

Dim frm As New Form1
frm.ANewMethod
Set frm = Nothing '窗体被撤消。

这样使用的窗体不会比类模块好，所以绝大部分窗体进入下一状态。

加载但不显示
Load 事件标志着此状态的开始。一旦窗体进入加载状态，Form_Load 事件过程中的代码就开始执行。

Form_Load 事件过程开始后，窗体上的所有控件都被创建和加载，而且该窗体有了一个窗口─ 是通过窗口句柄 (hWnd) 和设备描述体 (hDC) 完成的，尽管该窗口还未被显示。

任何窗体只有加载后才能可见。

很多窗体自动从创建但不加载状态进入加载但不显示状态。窗体如果满足以下的条件就会自动加载：

该窗体在“工程属性”对话框的“通用”选项卡中被指定为启动对象。


窗体中首先被调用的属性或方法是 Show 方法，正如示例 Form1.Show。


首先被调用的窗体属性或方法是窗体内置的成员，如上述例子中是 Move 方法。
注意 因为每个控件定义了窗体的一个属性，所以这种情况包括了窗体的所有控件；也就是说，为了访问 Command1 的 Caption 属性，就必须经过窗体的 Command1 属性：Command1.Caption。

正如早些时候所述的，可以用 Load 语句加载窗体，而无需首先使用 New 或 As New 创建该窗体。
从不显示的窗体
上述的前两种情况，一旦 Form_Load 执行完毕，窗体就直接可见。而后面的两种情况，窗体将保持加载状态，但不显示。

在 Visual Basic 中编程时，常常加载了某一窗体但从未予显示。这样做有以下的原因：

用时钟控件产生计时事件。


用功能控件，而不是用户界面控件。例如，串行通信或访问系统文件。


执行 DDE 事务。
注意 对于 VBP 和 VBE，可以创建 ActiveX 部件（以前称为OLE服务端），这比控件更有利于提供纯代码功能。请参阅《部件工具指南》中的“创建 ActiveX 部件”。

总是返回的根状态
任何时候，只要隐藏了窗体，它就总是从可见状态回到加载状态。回到加载状态并不重新执行 Load 事件。Form_Load 在窗体的存活期中只运行一次。

显示状态
一旦窗体可见，用户就能和它交互作用。当然，窗体在卸载前可以任意隐藏及显示。

其它事项：卸载前的准备
窗体在卸载时可以是隐藏的，也可以是可见的。若没隐藏，则它将保持可见直到卸载完毕。

窗体卸载前最后发生 Unload 事件。该事件发生前，有另一个重要的事件发生，即 QueryUnload。QueryUnload 提供了停止窗体卸载的机会。如果某些数据希望保存，则此时将提示保存或忽略所做的更改。

重点 把 QueryUnload 的参数 Cancel 设置为 True，就会忽略 Unload 语句，从而不卸载窗体。

QueryUnload 事件的一个重要功能是还要了解窗体的卸载是什么原因造成的：是单击“关闭”按钮，或是程序中执行 Unload 语句，或在应用程序中关闭，或者是在 Windows 中的关闭。所以 QueryUnload 提供了取消关闭窗体的机会，同时也允许在需要时从代码中关闭窗体。

重点 在一些情况下，窗体不会接收到 QueryUnload 事件。例如，使用了 End 语句来结束程序，或在开发环境中单击“结束”按钮（或从“运行”菜单中，选取“结束”按钮）。

详细信息 请参阅《语言参考》的“QueryUnload 事件”。

返回到创建但不加载状态
窗体卸载后，Visual Basic 把它从 Forms 集合中删除掉。除非使用变量保持对窗体的引用，否则该窗体将被撤消，其所占内存和资源会被 Visual Basic 收回。

如果使用变量保持了对窗体的引用，例如“定制窗体类”中描述的隐含全局变量，窗体就会回到创建但不加载状态。窗体的窗口、控件不再存在。

对象将继续占有资源和内存。所有窗体代码部分模块级变量中的数据继续存在（但是，事件过程中的 Static 变量将消失）。

可以使用已有的引用调用窗体中所添加的方法和属性。但如果调用了内置的成员，或访问其控件，该控件将再次加载，并执行 Form_Load。

完全释放内存和资源
释放内存和资源的唯一办法就是卸载窗体，并把所有引用设置为 Nothing。这种做法常常会漏掉那些隐含的全程变量引用。如果使用了类名（正如“属性”窗口中的 Name 属性所示）来引用窗体，就等于使用隐含全局变量。为了释放窗体占用的内存，必须把该变量设置为 Nothing。例如：

Set Form1 = Nothing

该窗体在撤消前会接收到 Terminate 事件。

提示 很多专业编程人员都避免使用隐含全局变量，而趋向于声明自己的窗体变量（例如，Dim dlgAbout As New frmAboutBox）。

注意 执行 End 语句将卸载窗体并把所有的对象变量设置为 Nothing。然而，这种中断程序的方法非常唐突。所有的窗体都不会发生 QueryUnload、Unload 或 Terminate 事件，所创建的对象也不会发生 Terminate 事件。

卸载未被引用，但有控件仍被引用
为了进入这一状态，就必须在卸载和释放窗体时保持对其中某一控件的引用：

Dim frm As New Form1
Dim obj As Object
frm.Show vbModal
'模态窗口解体，保存对其上一个控件的引用。
Set obj = frm.Command1
Unload frm
Set frm = Nothing

尽管窗体已卸载，则对它的所有引用就释放。但只要还引用了其中的一个控件，其代码部分将仍然保存在内存中。一旦调用该控件的任一属性或方法，该窗体将被再次加载：

obj.Caption = "Back to life"

模块级变量将保留它们的值，但所有控件的属性被设置为缺省值，好象该窗体是首次加载一样。Form_Load 将被执行。

注意 在 Visual Basic 以前的有些版本中，窗体不能完整地重新初始化，Form_Load 也不会再次执行。

注意 并不是所有的窗体都象 Visual Basic 窗体。例如，Microsoft Office 中提供的 Microsoft Forms，就没有 Load 和 Unload 事件；一旦这些窗体接收到初始化事件，则它们所有的控件就开始存在，并可以使用。

详细信息 有关窗体的内容，在“窗体、控件和菜单”中的“设计窗体”及“创建用户界面”中的“再论窗体”中都作了讨论。

[dashii]

没这么写过代码，不过刚试了一下：

Unload Form1 会把表单卸载掉，表单里面的变量还可以使用
Set Form1=Nothing 会把变量清空，但是表单还在

[dashii]

啊，不好意思，这么快就有人发这么全的说明了，呵呵

[lzheng2001]

楼上的贴这么多,能否简洁说一下有何不同?
unload 卸载窗体后,内存中是否仍然存在窗体
set nothing 后则资源是完全被释放出来.
我这样说对吗?

[lzheng2001]

unload 卸载窗体后,内存中仍然存在窗体
set nothing 后则资源是完全被释放出来.
我这样说对吗?

[lzheng2001]

你说的四种状态:
1.创建，但不加载。
2.加载，但不显示。
3.显示。
4.内存和资源完全收回。

执行unload 后,窗体属于哪种状态 ?

[zou19820704]

属于4.内存和资源完全收回

[province_]

或者简单地说：UNLOAD FORM就相当于你点了关闭窗口的那个叉叉，该窗体占用资源的释放完全由操作系统决定如何及何时收回；而SET FORM=NOTHING或SET 其它对象=NOTHING就相当于显式的对引用对象的计数作减一运算，而系统对计数为零的资源会予以收回，实际情况并不一定是马上收回的，但可以预计会有效收回。因此假设该计数较大（被多方引用），则SET NOTHING并不能理解为立刻收回，只是使该对象被引用的计数减去一。

[rainnygo]

学习

[VBToy]

mark

[DengXingJie]

路過