Локализация пункта элемента ListBox
Функция Search() предназначена для локализации (определения места) заданного пункта в списке. Элемент ListBox не предоставляет для этого каких-либо специфических методов, но позволяет определить, существует ли указанный пункт в списке, и узнать его индекс (если он существует). Для этого требуется установить свойству Text элемента нужное значение. Свойство Text элемента ListBox можно также установить из кода равным заданному пункту списка, то пункт будет автоматически выбран, и свойство ListIndex установится равным значению его индекса.
Ниже представлен код функции Search().
Фрагмент программы. Функция Search()
Function Search(KeyField) As Integer
List1.Text = KeyField
Search = List1.ListIndex
End Function
Для локализации пункта списка элемента ListBox можно предоставить пользователю элемент TextBox в поле которого можно ввести искомую строку. В событие Change элемента TeхtBoх вставьте код, определяющий вызовом функции Search() местонахождение пункта, ключ которого введен в поле элемента TextBox. Для программирования обработчика события Change элемента TextBox, содержащего ISBN, используйте следующий код.
Фрагмент программи. Обработчик события Change элемента TextBox с кодом ISBN
Private Sub txtISBN_Change()
position = Search(Trim$(txtISBN.Text))
If position > -1 Then
List1.ListIndex = position
ShowRecord
Else
txtPublisher.Text = ""
txtAuthor.Text = ""
txtTitle.Text = ""
End If
End Sub
Пользователь может находить пункт в списке с помощью мыши либо вводя его ключ в поле ISBN. Однако разработанное приложение имеет недостаток - оно не устанавливает частичного совпадения ключей. Другими словами если значение ISBN не имеет точного соответствия с записью в списке, то пункт не будет выбран. Предположим, что ключ равен 1984-2030-3. Тогда для значений ISBN, равных 1984-2030 или 1984-20, не будет найдена соответствующая запись.
5.5. Поле со списком (элемент ComboBox)
Элемент ComboBox
подобен ListBox
тем, что содержит множество пунктов,
доступных для выбора, но при этом занимает
на экране меньше места. Реальное
отличие между элементами ComboBox
и ListBox
состоит в том, что элемент ComboBox
позволяет пользователю задавать новые
пункты, которых нет в списке. В Visual
Basic доступны элементы
ComboBox
трех типов. В таблице 5.5.1. приведены
значения свойства Style,
задающие тип используемого элемента.
Таблица 5.5.1. Типы элемента ComboBox
Значение |
Описание |
0 |
DropDownCombo (по умолчанию). Поле с раскрывающимся списком. Данный тип элемента управления представляет собой обычное текстовое поле, объединенное с раскрывающимся списком. Пользователь может либо выбрать готовый элемент из списка, либо ввести новый элемент в текстовое поле |
1 |
Simple Combo. Поле с обычным списком. В этом типе элемента управления информация отображается в обычном (не раскрывающемся) списке. Как и в предыдущем случае, пользователь может выбрать готовый элемент из списка либо ввести новый элемент в текстовое поле. |
2 |
DropDownList. Раскрывающийся список. Пользователь может выбрать лишь то, что представлено в списке и не может ввести новый элемент в поле. |
Работа с полями со списками ничем не отличается от работы с обычными списками. Для изменения содержимого списка используются методы AddItem, RemoveItem и Clear. Элементы списка могут быть, как отсортированы, так и нет. У полей со списками также предусмотрены свойства ItemData и NewIndex. Единственное отличие описываемых списков – наличие текстового поля для ввода информации. Единственным недостатком полей со списками является то, что они не поддерживают выбор нескольких элементов.