Reference.Collection - свойство
Обновлен: Ноябрь 2007
Возвращает коллекцию, содержащую объект, который поддерживает это свойство или содержится в этой конструкции кода.
Пространство имен: VSLangProj
Сборка: VSLangProj (в VSLangProj.dll)
Синтаксис
'Декларация
ReadOnly Property Collection As References
'Применение
Dim instance As Reference
Dim value As References
value = instance.Collection
References Collection { get; }
property References^ Collection {
References^ get ();
}
function get Collection () : References
Значение свойства
Тип: VSLangProj.References
Возвращает коллекцию, относящуюся к объекту. Дополнительные сведения см. в разделе "Примечания".
Заметки
<Имя_коллекции> в синтаксисе является ссылкой на имя соответствующей коллекции, относящейся к объекту. Например, <Имя_коллекции> для объекта TextRange будет TextRanges. <Имя_коллекции> для объекта ToolBoxTab будет ToolBoxTabs. В целом имя коллекции представляет собой множественное число имени объекта.
Примеры
Sub CollectionExample(ByVal dte As DTE2)
' Before running this example, open a code document from a project
' and place the insertion point inside a class definition.
Try
' Retrieve the CodeClass at the insertion point.
Dim sel As TextSelection = _
CType(dte.ActiveDocument.Selection, TextSelection)
Dim cls As CodeClass = _
CType(sel.ActivePoint.CodeElement( _
vsCMElement.vsCMElementClass), CodeClass)
Dim elem As CodeElement
Dim peers As String
' List all peer elements of the CodeClass.
For Each elem In cls.Collection
If Not (elem Is cls) And Not IsNothing(elem.Name) Then
peers &= elem.Name & " (" & elem.Kind.ToString() & _
")" & vbCrLf
End If
Next
MsgBox(cls.Name & " has the following peer elements:" & _
vbCrLf & vbCrLf & peers)
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
public void CollectionExample(DTE2 dte)
{
// Before running this example, open a code document from a project
// and place the insertion point inside a class definition.
try
{
// Retrieve the CodeClass at the insertion point.
TextSelection sel =
(TextSelection)dte.ActiveDocument.Selection;
CodeClass cls =
(CodeClass)sel.ActivePoint.get_CodeElement(
vsCMElement.vsCMElementClass);
string peers = "";
// List all peer elements of the CodeClass.
foreach (CodeElement elem in cls.Collection)
{
if ((elem != cls) && (elem.Name != null))
peers += elem.Name + " (" + elem.Kind.ToString()
+ ")\n";
}
MessageBox.Show(cls.Name +
" has the following peer elements:\n\n" + peers);
}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}
}
Разрешения
- Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.
См. также
Ссылки
VSLangProj - пространство имен
Другие ресурсы
Практическое руководство. Компиляция и выполнение примеров кода модели объектов автоматизации