关闭分配给变量的 MS Access 表单的正确方法答案

【问题标题】：correct way to close an MS Access form assigned to variable关闭分配给变量的 MS Access 表单的正确方法
【发布时间】：2015-10-12 03:28:58
【问题描述】：

我有一个进度指示器表单。

我使用以下代码来打开和关闭它。使用 .visible=false 和 Set object=nothing 将其关闭，但该表单是否仍在内存中打开？

dim oProgInd as Form_frmProgressIndicator
set oProgInd = new Form_frmProgressIndicator
   With oProgInd
        .Status="Running Append"
        .visible=true
        .maxRecord=iMxRec
   End with
   Do
      ' some repetitive code
      oProgInd.Tick
   Loop
   oProgInd.visible=false
set oProgInd=nothing

我知道 Excel VBA 使用 Unload 来关闭表单。我应该在 MS Access VBA 中使用某种 Unload。

【问题讨论】：

标签： ms-access vba

【解决方案1】：

set oProgInd=nothing 将释放对表单类对象的引用。由于可能没有其他引用它，它应该被关闭。

您可以通过检查Forms 集合在“立即”窗口中进行确认：

? forms.Count
' if Count > 0, use this "for each" to see the form names ...
for each frm in forms : ? frm.name : next

【讨论】：

请注意，当您设置表单变量 = 无时，forms.count 通常在执行 do 事件之前不会更新。