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

Definice

Obor názvů:

Microsoft.VisualBasic

Sestavení:

Microsoft.VisualBasic.Core.dll

Zdroj:

Collection.vb

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

Parametry

Item

Object

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

Key

String

Nepovinný parametr. 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

Nepovinný parametr. Výraz, který určuje relativní pozici v kolekci. Prvek, který má být přidán, je umístěn v kolekci před element identifikovaný argumentem Before . Pokud Before je číselný výraz, musí to být číslo od 1 až po hodnotu vlastnosti kolekce Count . Pokud Before je String výraz, musí odpovídat řetězci klíče zadanému při přidání prvku, na který se odkazuje, do kolekce. Nelze zadat obě a BeforeAfter.

After

Object

Nepovinný parametr. Výraz, který určuje relativní pozici v kolekci. Prvek, který má být přidán, je umístěn v kolekci za element identifikovaný argumentem After . Pokud After je číselný výraz, musí to být číslo od 1 až po hodnotu vlastnosti kolekce Count . Pokud After je String výraz, musí odpovídat řetězci klíče zadanému při přidání prvku, na který se odkazuje do kolekce. Nelze zadat obě a BeforeAfter.

Příklady

Následující příklad používá metodu Add k přidání child objektů – instancí třídy s názvem child obsahující Public vlastnost name – do kolekce s názvem 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. Upravte obslužné _Click rutiny událostí pro tlačítka Přidat a Zobrazit seznam , jak je znázorněno na obrázku. 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 Before nebo After musí odkazovat na existující prvek kolekce, jinak dojde k chybě.

Before Pokud jsou argumenty a After vynechány, 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.