Программа для тестирования - VB

Узнай цену своей работы

Формулировка задачи:

Доброго времени суток! Я только начал изучение Visual Basic поэтому столкнулся с трудностью. Мне нужно написать программу для тестирования, в которой сбоку указан список вопросов через кнопки, при нажатии на которые происходит переход к вопросу. Также есть кнопка для ответа на вопрос, если нажать на нее, то происходит переход к следующему по порядку вопросу, кнопка из списка с вопросами становится неактивной и прибавляется 1 балл за правильный ответ. Но проблема заключается в следующем: если ответить, допустим на 5 вопрос, а затем перейти к 4, то после нажатия на кнопку "Ответить" программа перейдет снова к 5 вопросу. Можно ли как-то реализовать пропуск через уже отвеченное задание?

Решение задачи: «Программа для тестирования»

textual
Листинг программы
Dim ind%
 
Private Sub Command1_Click(Index As Integer)
ind = Index + 1
End Sub
 
Private Sub Command2_Click()
If ind > 0 Then
   'проверить правильность ответа
   Command1(ind - 1).Enabled = False
 
   For i = 0 To Command1.UBound
      If Command1(i).Enabled = True Then Exit For
   Next i
 
   If i <= Command1.UBound Then
      'вывести соотв.вопрос
      Command1(i).SetFocus
   End If
Else
   MsgBox "вопрос № ?"
End If
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

10   голосов , оценка 3.9 из 5
Похожие ответы