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

Необязательный элемент. Уникальное выражение типа String, задающее ключевую строку, которая может использоваться для доступа к этому элементу коллекции вместо индекса позиции.

Before

Object

Необязательный элемент. Выражение, задающее относительную позицию в коллекции. Добавляемый элемент помещается в коллекцию перед элементом, определяемым аргументом Before. Если параметр Before является числовым выражением, то он должен быть числом от 1 до значения Count коллекции. Если параметр Before является выражением типа String, то оно должно соответствовать ключевой строке, заданной при добавлении элемента в коллекцию. Нельзя указать одновременно и Before, и After.

After

Object

Необязательный элемент. Выражение, задающее относительную позицию в коллекции. Добавляемый элемент помещается в коллекцию после элемента, определяемого аргументом After. Если параметр After является числовым выражением, то он должен быть числом от 1 до значения Count коллекции. Если параметр After является выражением типа String, то он должно соответствовать ключевой строке, заданной при добавлении элемента в коллекцию. Нельзя указать одновременно и Before, и After.

Примеры

В следующем примере метод используется Add для добавления child объектов — экземпляров класса с именем child , содержащего Public свойство 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 должен ссылаться на существующий элемент коллекции; в противном случае возникает ошибка.

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

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