共用方式為


Outlook COM 增益集範本

下列程式碼範例會提供實作 COM 增益集的必要空事件程序。

Implements IDTExtensibility2 
 
Private Sub IDTExtensibility2_OnAddInsUpdate(custom() As Variant) 
' Occurs when the set of connected COM add-ins changes, that is when 
' any other add-in is connected or disconnected. 
' The custom argument is ignored. 
End Sub 
 
Private Sub IDTExtensibility2_OnBeginShutdown(custom() As Variant) 
' If the COM add-in is connected, occurs when Outlook begins its 
' shutdown routines. 
' The custom argument is ignored. 
 
End Sub 
 
Private Sub IDTExtensibility2_OnConnection(ByVal Application As Object, ByVal ConnectMode As AddInDesignerObjects.ext_ConnectMode, ByVal AddInInst As Object, custom() As Variant) 
' Occurs when the COM add-in is connected. 
' The Application argument is the Outlook Application object. 
' The ConnectMode argument specifies how the COM add-in was connected. 
' It can be 
' ext_cm_AfterStartup Add-in was connected after Outlook started, 
' or the Connect property of the corresponding 
' COMAddIn object was set to True 
' ext_cm_Startup Add-in was connected on startup 
' ext_cm_External 
' ext_cm_CommandLine 
' The AddInInst argument is the COMAddIn object that refers to the current 
' instance of the add-in itself. 
' The custom argument is ignored. 
End Sub 
 
Private Sub IDTExtensibility2_OnDisconnection(ByVal RemoveMode As AddInDesignerObjects.ext_DisconnectMode, custom() As Variant) 
' Occurs when the COM add-in is disconnected. 
' The RemoveMode argument specifies how the COM add-in was disconnected. 
' It can be 
' ext_dm_HostShutdown Add-in was disconnected when Outlook was 
' closed. 
' ext_dm_UserClosed Add-in was disconnected when the user 
' cleared the corresponding check box in the 
' COM Add-ins dialog box, or the Connect 
' property of the corresponding COMAddIn 
' object was set to False. 
' The custom argument is ignored. 
End Sub 
 
Private Sub IDTExtensibility2_OnStartupComplete(custom() As Variant) 
' If the COM add-in connects at startup, occurs when Outlook completes 
' its startup routines. This event does not occur if the COM add-in is not 
' connected when Outlook loads, even when the user connects the add-in in 
' the COM Add-ins dialog box. 
' The custom argument is ignored. 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應