Свойство Item (объект Collection)

Статья
11/05/2008

Обновлен: Ноябрь 2007

Возвращает заданный член объекта Collection по номеру позиции или ключу. Только для чтения.

Default Public ReadOnly Property Item( _
    ByVal { Key As String | Index As Integer | Index As Object } _
) As Object

Параметры

Key
Уникальное выражение типа String, определяющее строковый ключ, который может использоваться вместо позиционного индекса для доступа к элементу коллекции. Параметр Key должен соответствовать аргументу Key, заданному при добавлении элемента в коллекцию.
Index
(A) числовое выражение, задающее позицию элемента коллекции. Параметр Index должен быть числом от 1 до значения Свойство Count (объект Collection) коллекции. Или (Б) выражение типа Object, задающее позицию или ключ строки элемента коллекции.

Исключения

Тип исключения	Номер ошибки	Условие
ArgumentException	5	Параметр Key является недопустимым или не соответствует существующему элементу коллекции. Параметр Index не может быть интерпретирован как знак или числовые данные.
IndexOutOfRangeException	9	Параметр Key имеет значение Nothing. Значение параметра Index не соответствует существующему элементу коллекции.

См. столбец "Номер ошибки", если выполняется обновление приложений Visual Basic 6.0, в которых используется неструктурированная обработка ошибок. (Можно сравнить номер ошибки с Свойство Number (объект Err).) Однако по возможности следует заменять такую систему управления ошибками на Обзор структурной обработки исключений в Visual Basic.

Заметки

Если параметр Index имеет тип Object, то свойство Item пытается рассматривать его как String, Char, массив Char или целое число. Если с помощью ключевого слова Item не удается преобразовать параметр Index к типу String или Integer, создается исключение ArgumentException.

Свойство Item — это свойство коллекции по умолчанию. Таким образом, следующие строки кода эквивалентны:

MsgBox(CStr(customers.Item(1)))
MsgBox(CStr(customers(1)))

Пример

В этом примере свойство Item используется для получения ссылки на объект коллекции. Создается birthdays, как объект Collection и затем извлекается объект, представляющий день рождения Билла, используя ключ "Bill" в качестве аргумента Index.

Dim birthdays As New Collection()
birthdays.Add(New DateTime(2001, 1, 12), "Bill")
birthdays.Add(New DateTime(2001, 1, 13), "Joe")
birthdays.Add(New DateTime(2001, 1, 14), "Mike")
birthdays.Add(New DateTime(2001, 1, 15), "Pete")


...


Dim aBirthday As DateTime
aBirthday = birthdays.Item("Bill")
MsgBox(CStr(aBirthday))
aBirthday = birthdays("Bill")
MsgBox(CStr(aBirthday))

Обратите внимание, что при первом вызове (в отличие от второго) свойство Item указывается явно. Оба вызова работают, поскольку Item является свойством по умолчанию для объекта Collection.