Expressions.Item メソッド

[アーティクル]
08/22/2008

更新 : 2007 年 11 月

Expressions コレクション内の Expression オブジェクトを返します。

名前空間 : EnvDTE
アセンブリ : EnvDTE (EnvDTE.dll 内)

構文

'宣言
Function Item ( _
    index As Object _
) As Expression
'使用
Dim instance As Expressions
Dim index As Object
Dim returnValue As Expression

returnValue = instance(index)

Expression Item(
    Object index
)

Expression^ Item(
    [InAttribute] Object^ index
)

function Item(
    index : Object
) : Expression

パラメータ

index
型 : System.Object

必ず指定します。返す Expression オブジェクトのインデックス。

戻り値

型 : EnvDTE.Expression

Expression オブジェクト。

解説

Item メソッドは、コレクションがインデックス値に対応するオブジェクトを見つけられない場合に System.ArgumentException 例外をスローします。

例

Item メソッドの使用方法を次の例に示します。

このメソッドをテストするには

ターゲットアプリケーションはクラス A を含む必要があります。Main 関数は、クラス A のインスタンスを "a" という名前で作成する必要があります。
クラス A のインスタンスが作成され、そのメンバ変数が初期化された後に、Main 関数にブレークポイントを設定します。
ターゲットアプリケーションをデバッグモードで実行します。
ブレークポイントでアプリケーションが停止したら、アドインを実行します。

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.Expression exp = dte.Debugger.GetExpression("a", true, 1);
    EnvDTE.Expressions exps = exp.DataMembers;
    owp.OutputString("\nExpression count: " + exps.Count);
    owp.OutputString("\nEdition of the environment: " + exps.DTE.Edition);
    owp.OutputString("\nThe name of the current program: " + 
                     exps.Parent.CurrentProgram.Name);
    owp.OutputString("\nSecond expression: " + exps.Item(2).Name);
}
Shared Sub Item(ByRef dte As EnvDTE.DTE)
    Dim exp As EnvDTE.Expression = dte.Debugger.GetExpression("a", True, 1)
    Dim exps As EnvDTE.Expressions = exp.DataMembers
    Dim str As String = vbCrLf
    str = "Expression count: " + exps.Count.ToString()
    str += vbCrLf + "Edition of the environment: " + exps.DTE.Edition
    str += vbCrLf + "The name of the current program: " + _
           exps.Parent.CurrentProgram.Name
    str += vbCrLf + "Second expression: " + exps.Item(2).Name
    MessageBox.Show(str, "Expression Test - Expressions Properties")
End Sub