Page 62 - 6735

'процедура обробки події Change (зміна значення)
Private Sub ScrollBar1_Change()
'змінити надпис на формі на значення ScrollBar1
UserForm11.Caption = ScrollBar1.Value
End Sub

'процедура обробки події SpinUp (натиснуто кнопку "вверх")
Private Sub SpinButton1_SpinUp()
'збільшити значення на 2
SpinButton1.Value = SpinButton1.Value + 2
End Sub

'процедура обробки події Change (зміна значення)
Private Sub SpinButton1_Change()
'змінити надпис на формі на значення SpinButton1
UserForm11.Caption = SpinButton1.Value
End Sub

Рисунок 2.15 – Елементи керування ScrollBar і SpinButton

Клас TabStrip – набір вкладок

В прикладі UserForm12 показано використання елемента
керування TabStrip (набір вкладок), за допомогою якого
користувач може вибрати потрібну вкладку (рис. 2.16). На
TabStrip можна розташувати інші елементи керування, але одні і
ті ж для різних вкладок. Основною властивістю є
SelectedItem.Index (індекс вибраної вкладки), а основна подія –
Change (зміна вкладки).
62