Как создать кнопку Следующий вопрос в программе тестирования - VB
Формулировка задачи:
у меня есть два файла, один файл с вопросами, другой с ответами, мы их считываем в два массива, массив вопросов и ответов, ответы выводятся на метки. как сделать кнопку для перехода на следующий вопрос?подскажите идею
Решение задачи: «Как создать кнопку Следующий вопрос в программе тестирования»
textual
Листинг программы
Option Explicit
Dim i As Integer
Dim Vopros(1 To 10) As String, Otvet(1 To 10) As String
Private Sub Command1_Click() 'Следующий вопрос\ответ
i = i + 1
If i > 10 Then MsgBox ("Konez"): Exit Sub
Label1.Caption = Vopros(i)
Label2.Caption = Otvet(i)
End Sub