Створіть презентацію з трьох слайдів
другий слайд:
На цих слайдах розміщено компоненти з панелі
Розробник:
Властивості даних елементів встановіть
використовуючи панель Властивості (Свойства).
До всіх трьох кнопок додайте код, який
перевірить вибір потрібних елементів і виведе інформацію про результат
тестування.
Код процедур обробки клацань по кнопках
слайдів
Private Sub CommandButton1_Click()
If OptionButton1.Value = True Then MsgBox "Вірно!" Else MsgBox "Спробуйте знову"
End Sub
If OptionButton1.Value = True Then MsgBox "Вірно!" Else MsgBox "Спробуйте знову"
End Sub
Private Sub CommandButton1_Click()
If CheckBox1.Value = False And CheckBox2.Value = True And CheckBox3.Value = False Then MsgBox "Вірно!" Else MsgBox "Спробуйте знову" End Sub
If CheckBox1.Value = False And CheckBox2.Value = True And CheckBox3.Value = False Then MsgBox "Вірно!" Else MsgBox "Спробуйте знову" End Sub
Private Sub CommandButton1_Click()
If UCase(TextBox1.Text) = "ПОПОВ" Then MsgBox "Вірно!" Else MsgBox "Спробуйте знову"
End Sub
If UCase(TextBox1.Text) = "ПОПОВ" Then MsgBox "Вірно!" Else MsgBox "Спробуйте знову"
End Sub
Список використаних джерел
Немає коментарів:
Дописати коментар