Expression.Collection Свойство
Определение
Важно!
Некоторые сведения относятся к предварительной версии продукта, в которую до выпуска могут быть внесены существенные изменения. Майкрософт не предоставляет никаких гарантий, явных или подразумеваемых, относительно приведенных здесь сведений.
Получает коллекцию, содержащую объект, который поддерживает это свойство или содержится в этой конструкции кода.
public:
property EnvDTE::Expressions ^ Collection { EnvDTE::Expressions ^ get(); };
[System.Runtime.InteropServices.DispId(202)]
public EnvDTE.Expressions Collection { [System.Runtime.InteropServices.DispId(202)] get; }
[<System.Runtime.InteropServices.DispId(202)>]
[<get: System.Runtime.InteropServices.DispId(202)>]
member this.Collection : EnvDTE.Expressions
Public ReadOnly Property Collection As Expressions
Значение свойства
Коллекция Expressions.
- Атрибуты
Примеры
В следующем примере показано, как использовать Collection свойство.
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.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 Collection(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 - Collection Property")
End Sub