共用方式為


Collection.Add(Object, String, Object, Object) 方法

定義

將項目新增至 Collection 物件。

public void Add (object? Item, string? Key = default, object? Before = default, object? After = default);
public void Add (object Item, string Key = default, object Before = default, object After = default);
member this.Add : obj * string * obj * obj -> unit
Public Sub Add (Item As Object, Optional Key As String = Nothing, Optional Before As Object = Nothing, Optional After As Object = Nothing)

參數

Item
Object

必要。 任何類型的物件,可指定要加入至集合的元素。

Key
String

選擇性。 唯一的 String 運算式,其指定用來存取集合中這個新項目的索引鍵字串,藉以取代位置索引。

Before
Object

選擇性。 運算式,其指定集合中的相對位置。 要新增的項目會放置在集合中由 Before 引數識別的項目之前。 如果 Before 為數值運算式,它必須是從 1 到集合 Count 屬性值的一個數字。 如果 BeforeString 運算式,當所參考的項目新增到集合中時,它必須對應到指定的索引鍵字串。 不能同時指定 BeforeAfter

After
Object

選擇性。 運算式,其指定集合中的相對位置。 要新增的項目會放置在集合中由 After 引數識別的項目之後。 如果 After 為數值運算式,它必須是從 1 到集合 Count 屬性值的一個數字。 如果 AfterString 運算式,當所參考的項目新增到集合中時,它必須對應到指定的索引鍵字串。 不能同時指定 BeforeAfter

範例

下列範例會Add使用 方法,將包含childPublic屬性name之類別的實例加入child至名為的family集合。 若要查看運作方式,請使用兩個控件建立 ,Form並將其Text屬性設定為 AddListButtonchild 類別定義和 family 宣告新增至表單程式代碼。 _Click修改 [新增] 和 [列表] 按鈕的事件處理程式,如下所示。 [ 新增 ] 按鈕可讓您新增子系。 [ 清單] 按鈕會顯示所有子系的名稱。

Public Class child
    Public name As String
    Sub New(ByVal newName As String)
        name = newName
    End Sub
End Class
' Create a Collection object.
Private family As New Collection()
Private Sub addChild_Click() Handles Button1.Click
    Dim newName As String
    newName = InputBox("Name of new family member: ")
    If newName <> "" Then
        family.Add(New child(newName), newName)
    End If
End Sub
Private Sub listChild_Click() Handles Button2.Click
    For Each aChild As child In family
        MsgBox(aChild.name)
    Next
End Sub

備註

BeforeAfter 自變數必須參考集合的現有項目,否則會發生錯誤。

如果省 Before 略和 After 自變數,則會將新的 物件新增至集合結尾。

如果指定的 Key 值符合集合中現有專案的索引鍵,也會發生錯誤。

適用於