全部显示

使用 ActiveForm 属性（和 Screen 对象一起）可以标识或引用获得焦点的窗体。Form 对象，只读。

expression.ActiveForm

expression     必需。返回“应用于”列表中的一个对象的表达式。

设置

该属性设置含有一个对运行时获得焦点的 Form 对象的引用。

该属性仅在使用宏或 Visual Basic 时才可用，并且在所有视图具有只读属性。

说明

可以使用 ActiveForm 属性来引用活动的窗体和它的一个属性或方法。下面的示例显示活动窗体的 Name 属性设置：

Dim frmCurrentForm As Form

Set frmCurrentForm = Screen.ActiveForm

MsgBox "Current form is " & frmCurrentForm.Name

如果子窗体获得焦点，则 ActiveForm 将引用主窗体。在使用 ActiveForm 属性时，如果窗体或子窗体没有获得焦点，将产生错误。