Методи комбінованих полів
Методи комбінованих полів співпадають з методами списків.
-
Addltem
Move
Removeltem
ZOrder
Clear
OLEDrag
SetFocus
Drag
Refresh
ShowWhatsThis
Методи Addltem, Clear і Removeltem як і раніше грають особливу роль. Комбіновані поля, як і списки, зазвичай заповнюються декількома викликами методу Addltem в процедурі події Load форми.
З
Мал. 3.10. Список і комбіноване поле.
Проблеми легко вирішуються, якщо скористатися властивостями RowSource і ListField і зв'язати список (чи комбіноване поле) з базою даних. Ще більша гнучкість досягається при використанні спеціалізованих версій цих елементів, орієнтованих на роботу з базами даних (DBList і DBCombo). Детальнішу інформацію про цих і інших спеціалізованих елементах можна отримати в електронній документації Microsoft Developer Network.
Нерідко користувач повинен спочатку вибрати рядок із списку, а потім натиснути кнопку. При натисненні кнопки починається обробка вибраного рядка. Загальноприйнята альтернатива полягає в тому, щоб користувач міг двічі клацнути на потрібному рядку в списку, тим самим він одночасно вибирає її і починає подальшу обробку. Для цього можна викликати процедуру події Click кнопки з процедури події DblClick списку:
Private Sub cboItems_DblClick()
cmdAdd_Click
End Sub
Наступний фрагмент програми заповнює список і комбіновані поля на мал. 3.10. Цей приклад наочно показує, чим список відрізняється від комбінованого поля. Ми заповнимо список назвами різних фруктів, а в комбіновані поля занесемо сорти хліба. Оскільки я навмисно залишив перелік неповним, ви зможете ввести потрібний сорт хліба в комбінованому полі і додати його до інших.
Private Sub Form_Load()
'Додати рядки у список
LstItems.AddItem «Яблука»
LstItems.AddItem «Апельсини»
LstItems.AddItem «Виноград»
LstItems.AddItem «Мандарини»
LstItems.AddItem «Лимони»
LstItems.AddItem «Банани»
'Додати рядка в комбіноване поле
cboCombination.AddItem «Пшеничний»
cboCombination.AddItem «Білий»
cboCombination.AddItem «Житній»
cboCombination.AddItem «З висівками»
cboCombination.AddItem «Французький»
cboCombination.AddItem «Піта»
End Sub
Робота із списками і комбінованими полями
Давайте змінимо нашу форму, щоб з її допомогою можна було скласти замовлення для продуктового магазину. Ми хочемо, щоб додаток дозволяв вибрати рядки з комбінованого поля і включити їх в список.
1. Створіть новий проект, помістите на форму список і задайте його властивості Name значення IstGroceries.
2. Створіть під списком комбіноване поле і Встановіть значення його властивості Name в cboProducts, а значення Caption - в Хліб.
3. Розмістіть на формі два написи. Перший напис повинен знаходитися над списком, її властивості Caption слід присвоїти значення Замовлення продуктів.
4. Розташуйте другий напис між списком і комбінованим полем. Властивість Caption повинна мати значення Склад.
5. Створіть кнопку в середині нижньої частини форми. Задайте її властивості Name значення cmdAdd, а властивості Caption - значення &Додати.
6. Відредагуйте процедуру події Form_Load:
Private Sub Form_Load()
'Очистити список
LstGroceries.Clear
' Додати рядка в комбіноване поле
cboProducts.AddItem «Хліб»
cboProducts.AddItem «Мука»
cboProducts.AddItem «М'ясо»
cboProducts.AddItem «Макарони»
cboProducts.AddItem «Цукерки»
cboProducts.AddItem «Лимонад»
End Sub
7. Додайте наступний фрагмент в процедуру події cmdAdd_Click:
Private Sub cmdAdd_Click()
IstGroceries.AddItem cboProducts.Text
End Sub
8. Запустіть програму. Виберіть продукт з комбінованого поля. Щоб включити його в замовлення, натисніть кнопку Додати.
9. Зверніть увагу - на складі немає морозива. Ви можете ввести його в текстовому полі і натиснути кнопку Додати. Напевно, для вас доведеться зробити спеціальне замовлення.
ПІДКАЗКА. Щоб викликати в програмі процедуру події іншого елементу, досить ввести її ім'я, наприклад cmdAdd_Click: Проте для виклику подій Click кнопок існує і інша можливість - присвоїти значення True властивості Value цієї кнопки (наприклад, cmdAdd.Value = True).