共用方式為

ImportsEvents 介面

  • 發行項

提供當專案 Imports 陳述式加入到 Visual Basic 專案，或從 Visual Basic 專案刪除時而引發的事件的存取。使用這個物件的功能；如需物件的說明，請參考 ImportsEventsClass。

命名空間: VSLangProj
組件： VSLangProj (在 vslangproj.dll 中)

語法

'宣告
<GuidAttribute("037AD859-7A75-4CF3-8A38-83D6E045FEE3")> _
Public Interface ImportsEvents
    Inherits _ImportsEvents, _dispImportsEvents_Event
'用途
Dim instance As ImportsEvents

[GuidAttribute("037AD859-7A75-4CF3-8A38-83D6E045FEE3")] 
public interface ImportsEvents : _ImportsEvents, _dispImportsEvents_Event

[GuidAttribute(L"037AD859-7A75-4CF3-8A38-83D6E045FEE3")] 
public interface class ImportsEvents : _ImportsEvents, _dispImportsEvents_Event

/** @attribute GuidAttribute("037AD859-7A75-4CF3-8A38-83D6E045FEE3") */ 
public interface ImportsEvents extends _ImportsEvents, _dispImportsEvents_Event

GuidAttribute("037AD859-7A75-4CF3-8A38-83D6E045FEE3") 
public interface ImportsEvents extends _ImportsEvents, _dispImportsEvents_Event

備註

ImportsEvents 物件可以透過 VSProject 物件或 DTE 物件存取。透過 VSProject 物件，每個專案都有一個 ImportsEvents 物件，可用來存取該專案的事件。DTE 物件的 ImportsEvents 物件可用來連接到個別專案的事件，或連接到方案中所有 Visual Basic 專案的事件。

範例

以下兩個範例使用晚期繫結 VBImportsEvents 屬性連接到 Visual Basic 專案事件。

有兩種晚期繫結方法可以處理事件。第一種方法讓您可以連接到某特定專案的事件，且需要有Option Strict Off陳述式來編譯。如果 VBImportsEvents 呼叫的參數不是 Project 型別，這個方法將傳回錯誤。VBImportsEvents 的參數是選擇性的。如果省略該參數，便會收到方案中所有 Visual Basic 專案的事件。

' Macro editor
Option Strict Off
Imports VSLangProj
Dim WithEvents importEvents As ImportsEvents
Sub ConnectAllImportEvents()
   Dim proj As Project = DTE.Solution.Projects.Item(1)
   importEvents = DTE.Events.VBImportsEvents(proj)
End Sub 

Public Sub importEvents_ImportAdded(ByVal bstrImport As String) _
Handles importEvents.ImportAdded
   MsgBox(bstrImport)
End Sub

第二種晚期繫結方法，允許您在方案中所有專案事件加入事件處理方法。這個方法不能只針對特定專案來篩選事件，它會以 Option Strict On 來編譯。

' Macro editor
Imports VSLangProj
Dim WithEvents importEvents As ImportsEvents
Sub ConnectProjectImportEvents()
   importEvents = CType(DTE.Events.GetObject("VBImportsEvents"), _
      ImportsEvents)
End Sub

Public Sub importEvents_ImportAdded(ByVal bstrImport As String) _
Handles importEvents.ImportAdded
   MsgBox(bstrImport)
End Sub

請參閱

參考

ImportsEvents 成員
VSLangProj 命名空間