Reference.Collection 屬性

取得集合，內含支援這個屬性的物件或這個程式碼建構中的物件。

命名空間：  VSLangProj
組件：  VSLangProj (在 VSLangProj.dll 中)

語法

'宣告
ReadOnly Property Collection As References
    Get

References Collection { get; }

property References^ Collection {
    References^ get ();
}

abstract Collection : References

function get Collection () : References

屬性值

型別：VSLangProj.References
傳回物件的相關集合。如需詳細資訊，請參閱「備註」。

備註

語法中的 <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);
    }
}

.NET Framework 安全性

• 完全信任立即呼叫者。這個成員無法供部分信任的程式碼使用。如需詳細資訊，請參閱從部分受信任程式碼使用程式庫。

請參閱

參考

Reference 介面

VSLangProj 命名空間

其他資源

HOW TO：編譯和執行 Automation 物件模型程式碼範例