Activate 方法

通过将浏览器或检查器窗口提到前台并设置键盘焦点来激活该窗口。

expression  必选。该表达式返回 Explorer 或 Inspector 对象。

示例

本 Microsoft Visual Basic/Visual Basic for Applications 示例通过激活浏览器窗口来响应 NewMail 事件。示例代码必须放在类模块中，并且在 Microsoft Outlook 调用该事件过程前必须调用 Initialize_handler 例程。

Public WithEvents myOlApp As Outlook.Application
Public WithEvents myOlExp As Outlook.Explorer

Public Sub Initialize_handlers()
    Set myOlApp = CreateObject("Outlook.Application")
    Set myOlExp = myOlApp.ActiveExplorer
End Sub

Private Sub myOlApp_NewMail()
    myOlExp.Activate
End Sub