Цикл: Как грамотно организовать цикл с получением количества верных и неверных ответов? - VBA
Формулировка задачи:
Доброго времени суток, товарищи.
Вот есть у меня два рандомно генерируемых числа, проверка произведения которых проверяется вводом ответа в текст бокс. По результатам выводится общее количество верных и неверных ответов в лейблах. Как грамотно организовать цикл с получением количества верных и неверных ответов? Чтобы, напрмер, при числах 2 и 3 я вводил ответ 5, постоянно жал кнопку и счетчик неверных ответов менялся соответственно.
можно и не циклом
нет знающих?
Решение задачи: «Цикл: Как грамотно организовать цикл с получением количества верных и неверных ответов?»
textual
Листинг программы
Private Sub CommandButton1_Click() Dim a As Integer Dim b As Integer a = Int((8 * Rnd()) + 2) b = Int((8 * Rnd()) + 2) TextBox1.Text = a TextBox2.Text = b End Sub Private Sub CommandButton2_Click() Dim v As Integer Dim n As Integer a = TextBox1 b = TextBox2 c = TextBox3 c = a * b If TextBox3.Text = c Then MsgBox "Верно" Else MsgBox "Неверно" End If End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д