VSProjectEvents2.VSLangProjWebReferencesEvents-Eigenschaft

Artikel
10/24/2012

Ruft ein VSLangProjWebReferencesEvents-Objekt ab, das Zugriff auf Webverweisereignisse ermöglicht.

Namespace: VSLangProj80
Assembly: VSLangProj80 (in VSLangProj80.dll)

Syntax

'Declaration
ReadOnly Property VSLangProjWebReferencesEvents As VSLangProjWebReferencesEvents

VSLangProjWebReferencesEvents VSLangProjWebReferencesEvents { get; }

property VSLangProjWebReferencesEvents^ VSLangProjWebReferencesEvents {
    VSLangProjWebReferencesEvents^ get ();
}

abstract VSLangProjWebReferencesEvents : VSLangProjWebReferencesEvents

function get VSLangProjWebReferencesEvents () : VSLangProjWebReferencesEvents

Eigenschaftswert

Typ: VSLangProj80.VSLangProjWebReferencesEvents
Ein VSLangProjWebReferencesEvents-Objekt.

Beispiele

In diesem Beispiel werden Ereignisbehandlungsmethoden für ein bestimmtes Projekt unter Verwendung der VSLangProjWebReferencesEvents-Eigenschaft verbunden.Weitere Informationen zum Ausführen von Makrobeispielen finden Sie unter Gewusst wie: Kompilieren und Ausführen der Codebeispiele für das Automatisierungsobjektmodell.

Öffnen Sie ein Visual Basic-, Visual C#- oder Visual J#-Projekt, bevor Sie dieses Makro ausführen.

' 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

.NET Framework-Sicherheit

Volle Vertrauenswürdigkeit für den unmittelbaren Aufrufer. Dieser Member kann von nur teilweise vertrauenswürdigem Code nicht verwendet werden. Weitere Informationen finden Sie unter Verwenden von Bibliotheken aus teilweise vertrauenswürdigem Code.