ПРОЕКТ VBA «Тренажер устного счета».
Оценка 4.7

ПРОЕКТ VBA «Тренажер устного счета».

Оценка 4.7
Исследовательские работы +1
docx
информатика +1
9 кл—11 кл +1
08.05.2017
ПРОЕКТ VBA «Тренажер устного счета».
Постановка задачи. Создадим VBA проект под названием «Тренажер устного счета». Пользователь может выбрать режим работы. Для этого нужно щелкнуть по одной из кнопок меню. Если щелкнуть по кнопке «Сложение», форма меню исчезнет с экрана, а вместо нее появится новая форма. На ней находится пример на сложение двух чисел и место для ввода ответа. При нажатии на кнопку «Проверка» компьютер проверяет правильность введенного пользователем ответа и выводит на экран сообщение о результатах проверки. При нажатии на кнопку «Следующий пример» числа меняются случайным образом. Нажатие на кнопку «Меню» закрывает текущую форму и вызывает форму-меню.
тренажер.docx
Проект.   «Тренажер устного счета». Постановка задачи. Создадим  VBA проект   под названием   «Тренажер устного счета». Пользователь может выбрать режим работы. Для этого нужно щелкнуть по одной из кнопок меню. Если щелкнуть по кнопке «Сложение», форма меню исчезнет с экрана, а вместо нее появится новая форма. На ней находится пример на сложение двух чисел и место для ввода   ответа.   При   нажатии   на   кнопку   «Проверка»   компьютер   проверяет   правильность введенного пользователем ответа и выводит на экран сообщение о результатах проверки. При   нажатии   на   кнопку   «Следующий   пример»   числа   меняются   случайным   образом. Нажатие на кнопку «Меню» закрывает текущую форму и вызывает форму­меню.  Рисунок 1 Рисунок 2 Рисунок 3 Данный проект состоит из трех форм.  Ход работы: Кнопка «Следующий пример» Эти функции генерируют случайные числа между 0 и 1.      «Проверка»  Кнопка   В этой строке проверяется, правильный ли  ответ ввел пользователь. Расположите на формах объекты в соответствии с рисунками 1,2,3.  UserForm2) Код программы(      : Private Sub CommandButton1_Click() Label1.Caption = Int(Rnd * 10 + 1) Label3.Caption = Int(Rnd * 10 + 1) End Sub В нашем проекте слагаемые должны быть больше  или равны 1 и меньше или равны 10. Int(Rnd*(правая граница­ левая граница+1)+левая  граница). Private Sub CommandButton2_Click() If Val(Label1.Caption) + Val(Label3.Caption) = Val(TextBox1.Text)  Then Label5.Caption = "Молодец !!! Ответ верный" Else: Label5.Caption = " Не верно, попробуй  еще раз" End If End Sub Кнопка       «  Меню    »  Private Sub CommandButton3_Click() Метод  представляет собой действие,  выполняемое над объектом. Объект.Hide ­ закрывает  форму.  Объект.Show – вызывает  форму.  UserForm2.Hide UserForm1.Show End Sub Код процедуры  для объектов  формы UserForm3,  написать самостоятельно .

ПРОЕКТ VBA «Тренажер устного счета».

ПРОЕКТ VBA «Тренажер устного счета».

ПРОЕКТ VBA «Тренажер устного счета».

ПРОЕКТ VBA «Тренажер устного счета».
Материалы на данной страницы взяты из открытых истончиков либо размещены пользователем в соответствии с договором-офертой сайта. Вы можете сообщить о нарушении.
08.05.2017