Access平台开发人员帮助 > 通用函数库 > 按功能 > Access对象

函数说明

该函数判断Access对象是否关闭，直到Access对象关闭后，才会继续执行后面的代码。

函数原型

Public Function gf_WaitSysObjectClose(strClassName As String)

语法

gf_WaitSysObjectClose(strClassName)

参考：gf_WaitSysObjectClose("OTable") ‘等待表是否关闭

参数

参数名	必需/可选	数据类型	参数说明
strClassName	必需	String	要判断的Access对象。表：“OTable”；查询："OQry"；关系视图："OSysRel"。

返回值

无

示例

'等待表关闭，才继续执行代码

Sub subTest()

Docmd.OpenTable "tblTest" '打开tblTest表

gf_WaitSysObjectClose "OTable" '等待表关闭，若表不关闭，则不会继续执行下面的代码

Msgbox "表已经关闭" '能够执行这句代码，说明表已经关闭

End Sub

等待Access对象关闭（gf_WaitSysObjectClose函数）