Высокоуровневые методы информатики и программирования. Степанов А.Г. - 96 стр.

UptoLike

ВУЗ: 

СПб ГУАП | Санкт-Петербург

Составители: 

Рубрика: 

На рис. 16 показан результат конструирования формы с двумя группами переключа-
телей.
Рис. 16. Пример формы с двумя переключателями.
Пример 35. Программа обработки состояний групп переключателей, запус-
каемая после нажатия кнопки Применить.
'Внешние переменные, которые могут быть включены, например, в состав переменных класса
Dim Должность As Variant, Ставка_налога As Single
Private Sub CommandButton1_Click()
'Обработка состояния переключателей рамки Должность
If UserForm2.OptionButton1.Value <> 0 Then
Должность = UserForm2.OptionButton1.Caption
Else
End If
If UserForm2.OptionButton2.Value <> 0 Then
Должность = UserForm2.OptionButton2.Caption
Else
End If
If UserForm2.OptionButton3.Value <> 0 Then
Должность = UserForm2.OptionButton3.Caption
Else
End If
If UserForm2.OptionButton4.Value <> 0 Then
Должность = UserForm2.OptionButton4.Caption
Else
End If
'Обработка состояния переключателей рамки Ставка налога
If UserForm2.OptionButton5.Value <> 0 Then
Ставка_налога = 0.12
Else
End If
If UserForm2.OptionButton6.Value <> 0 Then
Ставка_налога = 0.13
Else
96

Страницы