Лабораторная работа №3. Проектирование приложений vb6, при решении задач, имеющих линейную структуру

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

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

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

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

   4. Вывести на экран необходимые панели инструментов, используя контекстное меню в области панели инструментов (рис. 1)

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

Задание 1. Решение задач, имеющих линейную структуру. Ввод исходных данных (переменных) организовать через TextBox а вывод данных на Label.

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

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

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

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

1. Сделать стартовой форму(Form1), на которой будет выполняться задание 1 (Project–Project Properties…)

2. используя панель General установить на форме объекты-метки (Label) для комментариев к исходным данным (переменной х и постоянным b,c,a) и расчетным данным (y,g,h). Задайте соответствующие меткам названия переменных, изменив свойство объекта Caption для каждой метки. Смените имена объектам (Name), включив в них имя соответствующей переменной (например: заменить Label1 на Label_х);

3. используя панель General установить на форме объекты - текстовое поле (TextBox) для ввода исходных данных (переменной х). Задайте имя объекту ((Name)) Text_х). Очистите свойство Text;

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

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

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

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

Private Sub Command2_Click()

x = Text_x.Text ‘Ввод исходных данных (переменных) через TextBox

b = 0.785

c = 0.5

a = 7.39

Y1 = (x + 1) * Log(a)

Y2 = Sqr(x ^ 2 + 2 * x + 1)

y = Y1 / Y2 + x ^ 2

g = 2 - y + Cos(b) / Sqr(c)

h = g * (1 + y) / (x ^ 2 - 1)

Label_b.Caption = “b=“ + Str(b) 'Вывод на метку значення b

Label_c.Caption = “c=“ + Str(c)

Label_a.Caption = “a=“ + Str(a)

Label_y1.Caption = “Y1=“ + Str(Y1)

Label_y2.Caption = “Y2=“ + Str(Y2)

Label_y.Caption = “y=“ + Str(y)

Label_g.Caption = “g=“ + Str(g)

Label_h.Caption = “h=“ + Str(h)

End Sub

4 этап – тестирование программы:

7. запустите проект на выполнение (категория меню Run), введите исходные данные, проверьте правильность расчетов используя кнопку Расчет.

8. протестируйте работу программы на других исходных данных. Запишите полученные результаты в файл-отчет.

COMP 25 D:\ HOME/ DOS/ QBASIC/ m08big11.bas

9. проведите анализ над ошибками.

‘Синтаксичні помилки: - невірно записана функція розрахунку логарифму:

було ln(х^2+1) необхідно LOG(х^2+1)

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

Задание 3. Решить задачу 3, соответственно варианта. Ввод исходных данных - переменных величин организовать через TextBox. Вывод результатов на Label. Записать полученные результаты в отчет.

ИНДИВИДУАЛЬНЫЕ ЗАДАНИЯ ДЛЯ ЛАБОРАТОРНОЙ РАБОТЫ:

Вариант 1,16. Розрахувати значення функцій

Задание 2. І уровень.

Вивести на екран q,t,m

Задание 3. ІІ уровень. ; ; ;S = 9,6, t, y – будь яке ;

Вариант 2,17. Розрахувати значення функцій

Задание 2. І уровень.

Вивести на екран t,s,m

Задание 3. ІІ уровень. , d, b, c – будь які, а=16

Вариант 3,18. Розрахувати значення функцій

Задание 2. І уровень.

Вивести на екран y,m,b

Задание 3. ІІ уровень. b=0,02; a - будь яке, р = 0,6

Вариант 4,19. Розрахувати значення функцій:

Задание 2. І уровень.

Вивести на екран r, f, m

Задание 3. ІІ уровень. ; t – будь яке; ;

Вариант 5,20. Розрахувати значення функцій

Задание 2. І уровень.

Вивести на екран z, q, a

Задание 3. ІІ уровень. t, a – будь яке, ;

Вариант 6,21. Розрахувати значення функцій

Задание 2. І уровень.

Вивести на екран c, r, m

Задание 3. ІІ уровень. ; ; S=C+rb+r2a f –будь яке; а=-3,1

Вариант 7,22. Розрахувати значення функцій

Задание 2. І уровень.

Вивести на екран f, m, c

Задание 3. ІІ уровень. a – будь яке

Вариант 8,23. Розрахувати значення функцій

Задание 2. І уровень.

Вивести на екран r, m, q

Задание 3. ІІ уровень. a, b, c –будь які; d=0,35

Вариант 9,24. Розрахувати значення функцій

Задание 2. І уровень.

Вивести на екран s, z, m.

Задание 3. ІІ уровень. t –будь яке

Вариант 10,25. Розрахувати значення функцій

Задание 2. І уровень.

Вивести на екран z, y, b

Задание 3. ІІ уровень. a – будь яке + d c=105

Вариант 11,26. Розрахувати значення функцій

Задание 2. І уровень.

Вивести на екран q, m, f

Задание 3. ІІ уровень. а,х – будь-які t=-3,33 +5

Вариант 12,27. Розрахувати значення функцій

Задание 2. І уровень.

Вивести на екран r, c, m

Задание 3. ІІ уровень. x = z-A d, t, c – будь-які А=0,654;

Вариант 13,28. Розрахувати значення функцій

Задание 2. І уровень.

Вивести на екран q, m, r

Задание 3. ІІ уровень. j=3,45; S = abc; a, b – будь-які c=6,31-j

Вариант 14,29. Розрахувати значення функцій

Задание 2. І уровень.

Вивести на екран q, r, m, t

Задание 3. ІІ уровень. f=154 а – будь-яке

Вариант 15,30. Розрахувати значення функцій

Задание 2. І уровень.

Вивести на екран z, b, m

Задание 3. ІІ уровень. x= ; c – будь-яке k=3; b=4; z=14

ЛАБОРАТОРНАЯ РАБОТА №4. ПРОЕКТИРОВАНИЕ ПРИЛОЖЕНИЙ VB6, ПРИ РЕШЕНИИ ЗАДАЧ, ИМЕЮЩИХ ВЕТВЯЩУЮСЯ СТРУКТУРУ.

Системная функция InputBox – функция, действие которой напрямую зависит от работы OSWindows, предназначена для ввода пользователем данных с клавиатуры через системное окно Окна ввода (InputBox) во время работы программы. Окно ввода InputBox состоит из 4-х элементов: строки Заголовка (title); Приглашения к вводу (prompt); поля ввода со Значением, предлагаемым по умолчанию (default); двух кнопок (<ОК> – возвращает строку, введенную пользователем и <Саnсеl> –возвращает пустую строку) Ф ормат функции InputBox InputBox (Приглашение [,Заголовок] [,Значение по умолчанию] [,Х] [,Y]) где X, Y — координаты левого верхнего угла окна. Все необязательные параметры указаны в квадратных скобках. Обычно функция используется в сочетании с операторами печати, присваивания Например: x = InputBox("Введите любое значение х", "Ввод данных", , 4000, 2000) Print InputBox("Введите любое значение х", "Ввод данных", , 4000, 2000)

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