将事件与 Application 对象一同使用 | Microsoft Docs

  • 2018/11/13

必须先创建一个类模块,并使用事件声明一个 Application 类型的对象,然后才能对 Application 对象使用事件。 例如,假定已经创建了一个名为 EventClassModule 的新的类模块。 新的类模块包含以下代码:

VB
Public WithEvents App As Application

使用事件声明新对象后,该对象将显示在类模块的"对象"列表框中,并且您可以为新对象编写事件过程。 (在"对象"框中选择新对象时,该对象的有效事件将列在"过程"列表框中。)

在运行过程之前,必须将类模块中声明的对象与 Application 对象连接起来。 可在任意的模块中用下列代码完成这一操作。

示例

VB
Dim X As New EventClassModule  Sub InitializeApp()  Set X.App = Application End Sub

运行 InitializeApp 过程之后,类模块中的 App 对象指向 Microsoft Excel Application 对象,并且类模块中的事件过程将在事件发生时运行。

(0)

相关推荐