Collection.Add(Object, String, Object, Object) Yöntem

Tanım

Ad Alanı:

Microsoft.VisualBasic

Bütünleştirilmiş Kod:

Microsoft.VisualBasic.Core.dll

Kaynak:

Collection.vb

Bir nesneye Collection öğe ekler.

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)

Parametreler

Item

Object

Gereklidir. Koleksiyona eklenecek öğeyi belirten herhangi bir türde bir nesne.

Key

String

İsteğe bağlı. Koleksiyondaki bu yeni öğeye erişmek için konumsal dizin yerine kullanılabilecek anahtar dizesini belirten benzersiz String bir ifade.

Before

Object

İsteğe bağlı. Koleksiyondaki göreli konumu belirten ifade. Eklenecek öğe, bağımsız değişken tarafından tanımlanan öğeden önce koleksiyona Before yerleştirilir. Sayısal bir ifadeyse Before , 1'den koleksiyonun Count özelliğinin değerine kadar bir sayı olmalıdır. bir String ifadeyseBefore, başvurulmakta olan öğe koleksiyona eklendiğinde belirtilen anahtar dizeye karşılık gelir. hem Afterhem de Before belirtemezsiniz.

After

Object

İsteğe bağlı. Koleksiyondaki göreli konumu belirten ifade. Eklenecek öğe, bağımsız değişken tarafından tanımlanan öğeden sonra koleksiyona After yerleştirilir. Sayısal bir ifadeyse After , 1'den koleksiyonun Count özelliğinin değerine kadar bir sayı olmalıdır. bir String ifadeyseAfter, başvuruda bulunılan öğe koleksiyona eklendiğinde belirtilen anahtar dizesine karşılık gelir. hem Afterhem de Before belirtemezsiniz.

Örnekler

Aşağıdaki örnek, adlı familybir koleksiyona özellik name içeren Public adlı child sınıfın örnekleri olan nesneleri eklemek child için yöntemini kullanırAdd. Bunun nasıl çalıştığını görmek için iki denetimle bir Form oluşturun ve özelliklerini Text ve Listolarak Add ayarlayın.Button Form koduna child sınıf tanımını ve family bildirimini ekleyin. _Click Ekle ve Listele düğmelerinin olay işleyicilerini gösterildiği gibi değiştirin. Ekle düğmesi alt öğeleri eklemenize olanak tanır. Liste düğmesi tüm çocukların adlarını görüntüler.

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

Açıklamalar

Before veya After bağımsız değişkeni koleksiyonun mevcut bir öğesine başvurmalıdır; aksi takdirde bir hata oluşur.

Hem hem After de Before bağımsız değişkenleri atlanırsa, yeni nesne koleksiyonun sonuna eklenir.

Belirtilen Key bir değer, koleksiyonun mevcut bir öğesinin anahtarıyla eşleşirse de hata oluşur.