2. Подготовка к выполнению задания:

   1. Загрузить Visual Basic 6 и создать новый стандартный проект;

   2. Создать 4 формы для организации меню и решения задач 1,2,3(Project–Add Form).

   3. Сохранить проект³ и формы⁴;

   4. Вывести на экран панель инструментов Standart, используя контекстное меню.

   5. Вывести на экран окна Project Explorer, Properties Window, Code, General используя категорию меню View;

З адание 1. Организовать общее меню для решения 3 задач.

1 шаг – программирование интерфейса задания:

10. сделать стартовой форму(Form1), на которой будет выведено меню (Project–Project Properties…).

11. задайте надпись объекту-форме, изменив свойство Caption, соответственно рис.2.

12. установить на форме объект-метку (Label) для строки-приглашения меню Задайте надпись объекту, изменив свойство Caption, соответственно рис.2.

13. установить на форме объекты CommandButton (4 кнопки): – один объект-кнопку для корректного завершения работы программы, второй, третий и четвертый объекты-кнопки для перехода к формам Заданий 2,3,4 соответственно. Задайте надпись объектам, изменив свойство Caption, соответственно рис.2.

2 шаг – создание кода программы:

14. для кнопки Command4 (Выход) запишите команду окончания работы программы.

15. для кнопки Command1 (Задача 1) запишите команды – перехода на форму 2.

Private Sub Command1_Click()

Form1.Hide ' Форма1 удаляется с экрана

Form2.Show ' Форма2 отображается на экране

End Sub

6а) проверить работу программы без удаления Формы 1.

16. для кнопки Command2 (Задача 2) запишите команды – перехода на форму 3.

17. для кнопки Command3 (Задача 3) запишите команды – перехода на форму 4.

18. Закрыть окна форм 1,3,4

З адание 2. Решение задачи 1. Ввод исходных - переменных величин организовать с клавиатуры, используя метод InputBox. Вывод результатов на метки.

1 Этап – постановка задачи. Система уравнений:

2 Этап - составление схемы алгоритма, выбор структуры даннях (рис.3).

3 Этап - программирование.

1 шаг – программирование интерфейса задачи:

1. установить на Форме 2 объекты-метки (Label) для комментариев к исходным данным (переменной х), расчетным данным (m) и анализируемой (s). Задайте надпись объектам (Caption), соответственно рис.4. Смените имена объектам (Name), включив в них имя соответствующей переменной (например: заменить Label1 на Label_х);

2. у становить на Форме 2 объекты-кнопки (CommandButton) – один объект-кнопку для корректного завершения работы программы; – вторую объект-кнопку для возврата в основное меню проекта; – третью объект-кнопку для расчетов и вывода результатов. Задайте надпись объектам (Caption), соответственно рис.4.;

3. задайте надпись объекту-форме, изменив свойство Caption, соответственно рис.4.

2 шаг – создание кода программы:

4. для одной кнопки запишите команду окончания работы программы

5. для второй кнопки запишите команды для возврата в основное меню проекта

6. для третей кнопки запишите команды - считывания с клавиатуры исходных данных (InputBox), вычислений расчетных данных и вывода результатов в метки:

-------------------------------------------------------------------------------------------------------------------

Private Sub Command1_Click()

x = InputBox("Введите любое значение х", "Ввод данных", , 4000, 2000)

Label_x.Caption = "x=" + Str(x)

If x >= 10 Then

m = x / 2

ElseIf x < 0 Then

m = x / 3

Else

m = x

End If

Label_m.Caption = "m=" + Str(m)

If m > 0 Then

Label_s.Caption = "m - больше"

Else

Label_s.Caption = "m – меньше или 0"

End If

End Sub

-------------------------------------------------------------------------------------------------------------------