Створіть презентацію з трьох слайдів
перший слайд:
другий слайд:
третій слайд:
На цих слайдах розміщено компоненти з панелі Розробник:
Властивості даних елементів встановіть використовуючи панель Властивості (Свойства).
До всіх трьох кнопок додайте код, який перевірить вибір потрібних елементів і виведе інформацію про результат тестування.
Код процедур обробки клацань по кнопках слайдів
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
Список використаних джерел
Немає коментарів:
Дописати коментар