ImportsEvents 介面
可用來存取當專案 Imports 陳述式加入到 Visual Basic 專案,或從 Visual Basic 專案刪除時所引發的事件。 請使用這個物件的功能性,並且參考 ImportsEventsClass 取得這個物件的文件。
命名空間: VSLangProj
組件: VSLangProj (在 VSLangProj.dll 中)
語法
'宣告
<GuidAttribute("037AD859-7A75-4CF3-8A38-83D6E045FEE3")> _
Public Interface ImportsEvents _
Inherits _ImportsEvents, _dispImportsEvents_Event
[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
[<GuidAttribute("037AD859-7A75-4CF3-8A38-83D6E045FEE3")>]
type ImportsEvents =
interface
interface _ImportsEvents
interface _dispImportsEvents_Event
end
public interface ImportsEvents extends _ImportsEvents, _dispImportsEvents_Event
ImportsEvents 類型會公開下列成員。
方法
名稱 | 描述 | |
---|---|---|
add_ImportAdded | 基礎架構。 僅限 Microsoft 內部使用。 (繼承自 _dispImportsEvents_Event)。 | |
add_ImportRemoved | 基礎架構。 僅限 Microsoft 內部使用。 (繼承自 _dispImportsEvents_Event)。 | |
remove_ImportAdded | 基礎架構。 僅限 Microsoft 內部使用。 (繼承自 _dispImportsEvents_Event)。 | |
remove_ImportRemoved | 基礎架構。 僅限 Microsoft 內部使用。 (繼承自 _dispImportsEvents_Event)。 |
回頁首
事件
名稱 | 描述 | |
---|---|---|
ImportAdded | 基礎架構。 僅限 Microsoft 內部使用。 (繼承自 _dispImportsEvents_Event)。 | |
ImportRemoved | 基礎架構。 僅限 Microsoft 內部使用。 (繼承自 _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