Лабораторная работа_Вар6. Лабораторная работа 5 Проектирование программного модуля для вычисления по формуле
Скачать 61.5 Kb.
|
Лабораторная работа № 5 «Проектирование программного модуля для вычисления по формуле» Цель работы: освоить приемы создания прикладных программ Постановка задачи : написать программу, вычисляющую значение функции Ход работы: 1. Составили блок-схему решения задачи. Рисунок 1. Блок-схема решения задачи. 2. Открыли программу Microsoft Word. 3. Запустили редактор VBA (комбинация клавиш Alt + F11) 4. Создали форму, которая будет представлять собой окно программы (Insert User Form) 5. Используя панель инструментов Toolbox, расположили на форме следующие элементы: – объекты Label (для вывода пояснений) – объекты TextBox (для ввода исходных данных и вывода результатов работы программы) – объекты CommandButton (для управления работой программы) Рисунок 2. Исходная форма программы 6. Изменили значение свойства Caption объектов Label и CommandButton. Рисунок 3. Форма программы с изменениями. 7. Написали программный код для обработки событий нажатия на кнопки «Вычислить» и «Выход». Private Sub CommandButton1_Click() Dim x As Single, y As Single, f As Single x = Val(TextBox1.Text) y = Val(TextBox2.Text) f = Sqr(Sin(x) ^ 2 + Cos(y) ^ 4) / Exp(x + y) TextBox3.Text = Str(f) End Sub Private Sub CommandButton2_Click() Unload Me End Sub 8. Протестировали работу программы. При x = 0, y=0 подсчитали вручную значение функции f = 1. При x = 1,y=2 подсчитали вручную значение функции f = 0.0427. Запустили программу и ввели значения x = 0 и x = 0. Рисунок 4. Результаты работы программы при x = 0,y=0. Рисунок 5. Результаты работы программы при x = 1,y=2. Результаты работы программы совпали с результатами ручных расчетов. Это означает, что программа работает правильно. Вывод: в ходе выполнения лабораторной работы мы овладели приемами создания прикладных программ, написали программу, вычисляющую значение функции . Проведенные испытания показали, что программа работает правильно. |