Свойство ListCount

Основные свойства, устанавливаемые в режиме разработки программы

Метод Clear

Метод RemoveItem

Метод AddItem

Методы элемента ListBox

Для управления элементом ListBox из приложения необходимо иметь возможность:

§ добавлять элементы в список;

§ удалять элементы из списка;

§ выбирать отдельные элементы списка.

Чтобы добавлять пункты в список, используется метод AddItem. Он имеет следующий синтаксис.

List1.Addltem item, index

Параметр item - это строка, добавляемая в список, а index - ее порядковый номер. Порядковый номер первого элемента списка равен нулю. Аргумент index необязателен. Если его опустить, строка добавляется в конец списка. Если значение свойства Sorted элемента установлено равным True, то пункт вставляется в соответствующее место списка независимо от значения аргумента index.

При занесении элемента в список, можно указать индекс существующего в списке элемента, перед которым будет занесен новый элемент.

List1.AddItem “Новый элемент”, 2

- добавляет перед третьим (0-2) элементом новый.

Пример. Фрагмент кода в процедуре обработки события Load позволяет наполнить список новыми элементами.

Private Sub Form_Load()

Dim i As Integer

For i = 1 To 100

List1.AddItem "Элемент номер " & i

Next

End Sub

Чтобы удалить пункт из списка, найдите его положение (index) в списке: index необходим методу RemoveItem

List1.RemoveItem Index

Параметр index указывает на порядковый номер удаляемого пункта и является обязательным. Следующий оператор удаляет пункт из начала списка

List1.RemoveItem 0

Удаляет из списка все элементы. Синтаксис метода несложен.

List1.Clear

Чтобы получить доступ к отдельным пунктам, можно использовать несколько свойств элементов ListBox и ComboBox. Для удаления пункта из списка необходимо знать его порядковый номер, но в данном случае этот аргумент метода RemoveItem используется редко. Как правило, удаляемый пункт выбирает пользователь либо удаляемые пункты выбирают из программного кода по их значениям.

Возвращает число пунктов списка. Доступ к ним можно получить с помощью значений индексов в диапазоне от 0 до ListCount-1.

Свойство List()

Это массив пунктов списка. Элемент массива List(0) содержит первый пункт списка элемент List(l)- второй и т.д., вплоть до последнего элемента- List(ListCount-l), содержащего последний пункт списка. Существует возможность создать готовый список еще во время разработки программы. Для этого нужно поместить элементы списка в свойство List, после ввода текущего элемента для перехода на новую строку нажмите клавишу <Ctrl> + <Enter>.

Массив List() часто используют для просмотра пунктов списка. Для просмотра всех пунктов элемента управления List1 с целью отыскания| и удаления пустых строк применяйте следующий цикл:

For i = List1.ListCount - 1 to 0 Step –1

If List1.List(i) = "" Then

List1.RemoveItem I

End If

Next

Цикл сканирует элементы массива List1() с конца. При удалении каждого пункта длина списка уменьшается на 1. Если сканировать список с начала, число итераций превысит число пунктов списка, что ведет к ошибке исполнения. Если же сканировать список с конца, эта ошибка исключается.

Дата добавления: 2014-12-23