Language.Collection Eigenschaft
Definition
Wichtig
Einige Informationen beziehen sich auf Vorabversionen, die vor dem Release ggf. grundlegend überarbeitet werden. Microsoft übernimmt hinsichtlich der hier bereitgestellten Informationen keine Gewährleistungen, seien sie ausdrücklich oder konkludent.
Ruft die Auflistung mit dem Objekt ab, das diese Eigenschaft unterstützt oder das in diesem Codekonstrukt enthalten ist.
public:
property EnvDTE::Languages ^ Collection { EnvDTE::Languages ^ get(); };
[System.Runtime.InteropServices.DispId(202)]
public EnvDTE.Languages Collection { [System.Runtime.InteropServices.DispId(202)] get; }
[<System.Runtime.InteropServices.DispId(202)>]
[<get: System.Runtime.InteropServices.DispId(202)>]
member this.Collection : EnvDTE.Languages
Public ReadOnly Property Collection As Languages
Eigenschaftswert
Eine Languages-Auflistung.
- Attribute
Beispiele
Im folgenden Beispiel wird die Verwendung der- Collection Eigenschaft veranschaulicht.
public static void Collection(DTE dte)
{
// Setup debug Output window.
Window w = (Window)dte.Windows.Item(EnvDTE.Constants.vsWindowKindOutput);
w.Visible = true;
OutputWindow ow = (OutputWindow)w.Object;
OutputWindowPane owp = ow.OutputWindowPanes.Add("Collection Property Test");
owp.Activate();
EnvDTE.Language language = dte.Debugger.Languages.Item(1);
owp.OutputString("Number of items in the language collection is " +
language.Collection.Count + ": ");
foreach(EnvDTE.Language lang in language.Collection)
owp.OutputString(lang.Name + " ");
owp.OutputString("\nEdition of the environment: " + language.DTE.Edition);
owp.OutputString("\nThe name of the current program: " +
language.Parent.CurrentProgram.Name);
}
Shared Sub Collection(ByRef dte As EnvDTE.DTE)
Dim language As EnvDTE.Language = dte.Debugger.Languages.Item(1)
Dim str As String = vbCrLf
str = "There are " + language.Collection.Count.ToString()
str += " items in the language collection: "
For Each lang As EnvDTE.Language In language.Collection
str += lang.Name + " "
Next
str += vbCrLf + vbCrLf + "Edition of the environment: " + _
language.DTE.Edition
str += vbCrLf + vbCrLf + "The name of the current program: " + _
language.Parent.CurrentProgram.Name
MessageBox.Show(str, "Language Test - Collection Property")
End Sub