Чтоб при выборе правильного ответа -прибавлялись балы, и открывалась следующая страничка с вопросом. При выборе неправильно ответа - выходила страничка - не верно. Прав.ответ такой то... И дальше опять след.ответ из викторины. Всем откликнувшимся заранее СПАСИБО

Присоединяйтесь — мы покажем вам много интересного
Присоединяйтесь к ОК, чтобы подписаться на группу и комментировать публикации.
Комментарии 2
Private Sub cmdok_Click()
If (opt1.Value = False) _
And (opt2.Value = False) _
And (opt3.Value = False) Then
MsgBox "выберите ответ!", vbExclamation
Exit Sub
End If
If opt2.Value = True Then
count = count + 1
Else
MsgBox "не правильно, правильный ответ 2", vbInformation
End If
opt1.Enabled = False
opt2.Enabled = False
opt3.Enabled = False
cmdOk.Enabled = False
SlideShowWindows(Index:=1).View.Next
End Sub
И так на каждом слайде. Есть наверное более рациональный способ, но я в VBA не разбираюсь особо, может просто идею возьмете и сделаете по своему.
Ну и на слайде с результатом вывести зхначение count, которое суммируется.