Languages.Item 方法

返回 Languages 集合中的一个 Language 对象。

命名空间:  EnvDTE
程序集:  EnvDTE(在 EnvDTE.dll 中)

语法

声明
Function Item ( _
    index As Object _
) As Language
Language Item(
    Object index
)
Language^ Item(
    [InAttribute] Object^ index
)
abstract Item : 
        index:Object -> Language 
function Item(
    index : Object
) : Language

参数

返回值

类型:EnvDTE.Language
Language 对象。

备注

如果集合找不到对应于索引值的对象,则 Item 方法引发 System.ArgumentException 异常。

示例

下面的示例演示如何使用 Item 方法。

若要测试此方法,请执行下列操作:

  1. 在目标应用程序中设置一个断点。

  2. 以调试模式运行目标应用程序。

  3. 当应用程序停在该断点处时,运行外接程序。

public static void Item(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("Item Method Test");
    owp.Activate();
    EnvDTE.Languages languages = dte.Debugger.Languages;
    owp.OutputString("\nEdition of the environment: " + languages.DTE.Edition);
    owp.OutputString("\nThird language in the language collection: " + 
                     languages.Item(3).Name);
    owp.OutputString("\nThe name of the current program: " + 
                     languages.Parent.CurrentProgram.Name);
}
Shared Sub Item(ByRef dte As EnvDTE.DTE)
    Dim languages As EnvDTE.Languages = dte.Debugger.Languages
    Dim str As String = vbCrLf
    str = "Edition of the environment: " + languages.DTE.Edition
    str += vbCrLf + vbCrLf + "Third language in the language collection: "
    str += languages.Item(3).Name
    str += vbCrLf + vbCrLf + "The name of the current program: " + _
           languages.Parent.CurrentProgram.Name
    MessageBox.Show(str, "Language Test - Item Method")
End Sub

.NET Framework 安全性

请参见

参考

Languages 接口

EnvDTE 命名空间

其他资源

如何:编译和运行自动化对象模型代码示例