Работа со списками

1. Создать на форме 2 списка: один в верхней, а другой в нижней половине формы.

2. Дважды щелкнуть на форме, чтобы открыть окно программного кода формы. Добавить в процедуру события Form_Loadфрагмент:

Option Explicit

Private Sub Form_Load()

List1.AddItem "Гайки"

List1.AddItem "Болты"

List1.AddItem "Гвозди"

End Sub

Добавить в процедуру события DblClickList1 фрагмент:

PrivateSubList1_DblClick()

List2.AddItemList1.Text' включить строку в другой список

List1.RemoveItemList1.ListIndex'удалить строку из данного списка

End Sub

Добавить в процедуру события DblClickList2 фрагмент:

PrivateSubList2_DblClick()

List1.AddItemList2.Text' включить строку в другой список

List2.RemoveItemList2.ListIndex'удалить строку из данного списка

End Sub

Запустить программу и двойным щелчком на любой строке списка переместить её в другой список и наоборот.

Т. о. сначала строка добавляется в другой список, а затем уже удаляется из текущего.

Комбинированное поле (ComboBox)

Комбинированные поля сочетают возможности текстового поля и списка. В списке невозможно непосредственно отредактировать строку или выбрать строку, отсутствующую в нем. Имя комбинированного поля использует префикс cbo.

Комбинированное поле может быть раскрывающимся, тогда оно займет в форме меньше места, чем список. В режиме конструирования доступны 3 разновидности комбинированных полей:

• раскрывающиеся поля;

• простые поля;

• раскрывающиеся списки.

При этом тип поля определяется свойством Style.

Хотя комбинированные поля по свойствам, методам и событиям похожи на списки, свойство Textв них работает иначе. Если в списке оно может только вернуть текст выделенной строки, то для комбинированных полей значение этого поля можно задавать и при выполнении программы: текст задается даже в том случае, если строка отсутствует в списке.

Свойства комбинированных полей

Многие свойства такие же, как и для списков.

Особую роль играет свойствоStyleкомбинированного списка. Оно может принимать 3 значения (0 – 2), определяющих вид поля:раскрывающееся комбинированное поле; простое комбинированное поле и раскрывающийся список.

Раскрывающееся поле- похоже на стандартное текстовое, но справа имеется кнопка со стрелкой, которое раскрывает список.

Именно этот вариант называется комбинированным полем.

Простое поле – в котором список постоянно открыт.

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

События комбинированных полей

Основные - Click,DblClick,Change.

Change отсутствует в раскрывающихся списках, т. к. в них запрещено редактирование.

DblClickимеет отношение только к простым спискам, т. к. в них можно видеть весь список

Методы комбинированных полей

Совпадают с методами списков (AddItem,Clear,RemoveItemи т. п.)

Комбинированные поля заполняются также вызовами метода AddItemв процедуруLoadформы.

Пример работы с комбинированным полем

Ввести в форму элемент список (ListBox) –List1 и удалить значение свойстваListItemсписка. Ввести комбинированный список (ComboBox) –Combo1 и установить в свойствеStyleзначениеDropdownCombo(комбинированное поле).

Option Explicit

Private Sub Form_Load()

List1.AddItem "Яблоки"

List1.AddItem "Апельсины"

List1.AddItem "Виноград"

List1.AddItem "Мандарины"

End Sub

Private Sub List1_Click()

Сомбо1AddItem List1.Text

End Sub