Collection.Add(Object, String, Object, Object) Metoda

Definice

Přidá prvek do objektu 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)

Parametry

Item
Object

Required. Objekt libovolného typu, který určuje prvek, který se má přidat do kolekce.

Key
String

Optional. Jedinečný String výraz, který určuje řetězec klíče, který lze použít místo pozičního indexu pro přístup k tomuto novému prvku v kolekci.

Before
Object

Optional. Výraz, který určuje relativní pozici v kolekci. Prvek, který se má přidat, je umístěn v kolekci před prvek identifikovaný argumentem Before . Pokud Before je číselný výraz, musí být číslo od 1 do hodnoty vlastnosti kolekce Count . Pokud Before je String výraz, musí odpovídat řetězci klíče zadanému při přidání prvku odkazovaného do kolekce. Nelze zadat oba Before a After.

After
Object

Optional. Výraz, který určuje relativní pozici v kolekci. Prvek, který se má přidat, je umístěn v kolekci za prvek identifikovaný argumentem After . Pokud After je číselný výraz, musí být číslo od 1 do hodnoty vlastnosti kolekce Count . Pokud After je String výraz, musí odpovídat řetězci klíče zadanému při přidání prvku do kolekce. Nelze zadat oba Before a After.

Příklady

Následující příklad používá metodu Add k přidání child objektů - instance třídy s názvem child obsahující Public vlastnost name - do kolekce volaného family. Pokud chcete zjistit, jak to funguje, vytvořte se Form dvěma Button ovládacími prvky a nastavte jejich Text vlastnosti na Add a List. Přidejte definici child třídy a family deklaraci do kódu formuláře. _Click Upravte obslužné rutiny událostí pro tlačítka Přidat a Seznam, jak je znázorněno. Tlačítko Přidat umožňuje přidat podřízené položky. Tlačítko Seznam zobrazuje jména všech podřízených položek.

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

Poznámky

Argument BeforeAfter musí odkazovat na existující prvek kolekce, jinak dojde k chybě.

Pokud vynecháte Before oba argumenty After , nový objekt se přidá na konec kolekce.

K chybě dojde také v případě, že zadaná Key hodnota odpovídá klíči pro existující prvek kolekce.

Platí pro