Sdílet prostřednictvím


Language.Name Property

Definition

Gets the name of the object.

public:
 property System::String ^ default { System::String ^ get(); };
public:
 property Platform::String ^ default { Platform::String ^ get(); };
[System.Runtime.InteropServices.DispId(0)]
public string this { [System.Runtime.InteropServices.DispId(0)] get; }
[<System.Runtime.InteropServices.DispId(0)>]
[<get: System.Runtime.InteropServices.DispId(0)>]
member this.Name : string
Default Public ReadOnly Property Name As String

Property Value

A string representing the name of the Language object.

Attributes

Examples

The following example demonstrates how to use the Name property.

Public static void Name(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("Name 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 Name(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 - Name Property")  
End Sub  

Applies to