更新：2007 年 11 月
提供存取給因加入、刪除或變更專案 Web 參考而引發的事件。
命名空間： VSLangProj80
組件： VSLangProj80 (在 VSLangProj80.dll 中)
語法
<GuidAttribute("33BD7FEF-EEB4-412A-A4C1-9FBFF6F57067")> _
Public Interface VSLangProjWebReferencesEvents _
Implements _VSLangProjWebReferencesEvents, _dispVSLangProjWebReferencesEvents_Event
Dim instance As VSLangProjWebReferencesEvents
[GuidAttribute("33BD7FEF-EEB4-412A-A4C1-9FBFF6F57067")]
public interface VSLangProjWebReferencesEvents : _VSLangProjWebReferencesEvents,
_dispVSLangProjWebReferencesEvents_Event
[GuidAttribute(L"33BD7FEF-EEB4-412A-A4C1-9FBFF6F57067")]
public interface class VSLangProjWebReferencesEvents : _VSLangProjWebReferencesEvents,
_dispVSLangProjWebReferencesEvents_Event
public interface VSLangProjWebReferencesEvents extends _VSLangProjWebReferencesEvents, _dispVSLangProjWebReferencesEvents_Event
備註
VSLangProjWebReferencesEvents 物件可以透過 VSProjectEvents2 物件或 DTE 物件存取。
此物件具有下列事件：
範例
這個範例會使用 VSLangProjWebReferencesEvents 屬性，連接特定專案的事件處理方法。如需如何執行巨集範例的詳細資訊，請參閱 HOW TO：編譯和執行 Automation 物件模型程式碼範例。
開啟 Visual Basic、Visual C# 或 Visual J# 專案，再執行此巨集。
' Macro code.
' Connects trivial methods to the OnAfterWebReferenceAdded,
' OnBeforeWebReferenceRemoved and OnWebReferenceChanged
' events of the first project in the solution.
' The first project is a Visual Basic, C#, or J# rpoject.
Imports VSLangProj
Imports VSLangProj80
Sub ConnectWebEvents()
Dim proj As Project = DTE.Solution.Projects.Item(1)
Dim vsproj As VSProject2 = CType(proj.Object, VSProject2)
Dim refEvents As VSLangProjWebReferencesEvents =_
vsproj.Events2.VSLangProjWebReferencesEvents
AddHandler refEvents.OnAfterWebReferenceAdded,_
AddressOf WebReferenceAdded
AddHandler refEvents.OnBeforeWebReferenceRemoved,_
AddressOf WebReferenceRemoved
AddHandler refEvents.OnWebReferenceChanged,_
AddressOf WebReferenceChanged
End Sub
Sub WebReferenceRemoved(ByVal removedRef As Object)
MsgBox("The reference for " & removedRef.Name & " was removed.")
End Sub
Sub WebReferenceChanged(ByVal changedRef As Object)
MsgBox("The reference for " & changedRef.Name & " was changed.")
End Sub
Sub WebReferenceAdded(ByVal addedRef As Object)
MsgBox("The reference for " & addedRef.Name & " was added.")
End Sub
請參閱
參考
VSLangProjWebReferencesEvents 成員