다음을 통해 공유


Reference.Collection 속성

이 속성을 지원하는 개체가 포함된 컬렉션이나 이 코드 구문에 포함된 컬렉션을 가져옵니다.

네임스페이스: VSLangProj
어셈블리: VSLangProj(vslangproj.dll)

구문

‘선언
‘사용 방법

속성 값

개체와 관련된 컬렉션을 반환합니다. 자세한 내용은 설명 부분을 참조하십시오.

설명

구문의 <CollectionName> 요소는 개체와 연결되는 해당 컬렉션 이름을 나타냅니다. 예를 들어 TextRange 개체의 <CollectionName>은(는) TextRanges가 될 수 있고 ToolBoxTab 개체의 <CollectionName>은(는) 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);
    }
}

참고 항목

작업

방법: 자동화 개체 모델 코드의 예제 컴파일 및 실행

참조

Reference 인터페이스
Reference 멤버
VSLangProj 네임스페이스