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

函数说明

该函数可以判断一个窗体是否处于打开状态。

函数原型

Public Function gf_FormOpened(strFormName As String) As Boolean

语法

gf_FormOpened(strFormName)

参考：gf_FormOpened("frmTest") ’判断窗体frmTest是否处于打开状态

参数

参数名	必需/可选	数据类型	参数说明
strFormName	必需	String	要检查的窗体名

返回值

返回一个布尔型(Boolean)的值。如果对应的窗体处于打开状态，则返回True。不存在，则返回False。

示例

Sub subTest()

Dim blnReturn As Boolean '定义布尔型变量，保存返回的结果

blnReturn = gf_FormOpened("frmTest") '判断窗体 frmTest 是否处于打开状态

'显示结果

If blnReturn Then

Msgbox "窗体 frmTest 打开着"

Else

Msgbox "窗体 frmTest 没有打开"

End If

End Sub

判断窗体是否打开（gf_FormOpened函数）