Методи комбінованих полів

Методи комбінованих полів співпадають з методами списків.

Методи Addltem, Clear і Removeltem як і раніше грають особливу роль. Комбіновані поля, як і списки, зазвичай заповнюються декількома викликами методу Addltem в процедурі події Load форми.

З часом (особливо якщо вам доводилося працювати з системою управління базами даних Microsoft Access) у вас неминуче виникне питання - чи досить гнучкі списки і комбіновані поля? Що робити, якщо вміст списку постійно змінюється? Чи повинні ви знову і знову заповнювати список, викликаючи Addltem? І як зробити це в самостійному ЕХЕ-файлі, побудованому на основі вашого проекту з розширенням.VBP? Крім того, вводити довгі ланцюжки методів Addltem - досить нудне заняття.

Проблеми легко вирішуються, якщо скористатися властивостями 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