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

时间:2015-10-11 18:56:15

标签: ms-access access-vba

我有一个进度指示表。

我使用以下代码打开和关闭它。用.visible = false关闭它并设置对象=没有效果但是表格在内存中是否仍然打开?

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中使用某种卸载方式。

1 个答案:

答案 0 :(得分: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