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

定義

命名空間:
Microsoft.VisualBasic
組件:
Microsoft.VisualBasic.dll

為物件加入一個元素 Collection 。

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

Optional. 一個獨特的 String 表達式，指定一個鍵串，可以取代位置索引來存取集合中這個新元素。

Before
Object

Optional. 一個表示式，用來指定集合中的相對位置。 要加入的元素會放在集合中，先於由 Before 參數識別的元素。 若 Before 為數值表達式，則必須是從 1 到集合性質值 Count 的數字。 若 Before 為 String 表達式，則必須對應於被引用元素加入集合時指定的鍵串。 你無法同時指定 Before 和 After。

After
Object

Optional. 一個表示式，用來指定集合中的相對位置。 要加入的元素會放在由 After 參數識別的元素之後的集合中。 若 After 為數值表達式，則必須是從 1 到集合性質值 Count 的數字。 如果 After 是 String 表達式，則必須對應於加入集合時指定的鍵串。 你無法同時指定 Before 和 After。

範例

以下範例使用Add了這個方法，將物件——一個稱為child包含Public屬性name的類別實例——加入child一個稱為 family的集合。 要了解這個原理，可以建立 Form 一個有兩個 Button 控制項的 ，並將它們 Text 的屬性設為 Add 和 List。 把類別定義和family聲明加child到表單程式碼裡。 如圖所示修改_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

備註

Before或After參數必須指向集合中已有的元素;否則會發生錯誤。

若BeforeAfter兩個參數都省略，則將新增物件加入集合末尾。

若指定 Key 值與集合中現有元素的鍵值相符，也會出現錯誤。

適用於