Collection.Add(Object, String, Object, Object) Метод

Определение

Пространство имен:

Microsoft.VisualBasic

Сборка:

Microsoft.VisualBasic.Core.dll

Исходный код:

Collection.vb

Добавляет элемент в 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 объектов — экземпляров класса, вызываемого childPublic свойством name , в вызываемую familyколлекцию. Чтобы узнать, как это работает, создайте Form элемент управления с двумя Button элементами управления и задайте их Text свойства Add и List. child Добавьте определение класса и 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

Комментарии

Before Аргумент должен ссылаться на существующий элемент коллекции. В After противном случае возникает ошибка.

Before After Если оба аргумента опущены, новый объект добавляется в конец коллекции.

Ошибка также возникает, если указанное Key значение соответствует ключу для существующего элемента коллекции.