Лабораторная
работа № 20
Тема: Арифметические
выражения. Организация ввода и вывода данных.
Цель работы:
познакомится
с основными функциями составления программ, составить программу калькулятор.
Студент
должен
знать:
основы
событийных процедур;
технологию
составления программ;
уметь:
запускать
программу VISUAL
BASIC;
пользоваться
командами панели COMMAND BUTTON;
внедрять и
связывать в программе объекты разной природы.
Теоретическое
обоснование
Создание
проекта Калькулятор.
Работа
над проектом начинается с создания графического интерфейса, для этого в окне
Конструктор форм на форму помещаются управляющие элементы.
1.
Разместить на форме три текстовых поля и пять кнопок. Присвоить им имена: txt1, txt2, txt3, cmdPlus, cmdMinus, cmdUmn, cmdDelen, cmdExit.
Разместить также три метки для подписи полей.
Событийная
процедура сложения cmdPlus_Click() должна
изменять значения свойства Text текстового поля txt3 так,
чтобы оно являлось суммой числовых значений свойства Text
текстовых полей txt1 и txt2. для
преобразования строковых значений, вводимых в текстовые поля. В десятичные
числа, воспользуемся функцией Val. Код событийной процедуры будет
следующим:
Sub
cmdPlus_Click()
Txt2.Text=Val(txt1.Text)+Val(txt2.Text)
End Sub
Событийные
процедуры вычитания, умножения и деления создаются аналогично.
2.
Для каждой из кнопок ввести программные коды событийных процедур.
3.Установить
для свойства Alignment текстовых
полей значение Right Justufy.
4.
Пятую кнопку запрограммировать на окончание(завершение) работы с калькулятором.
5.
Запустить проект на выполнение. Ввести числа в два левых текстовых поля и
щёлкнуть по кнопке арифметической операции. В правом поле будет выведен
результат.
Ход
работы
1. Выполнить
практические задания.
2. Представить
результаты практических заданий преподавателю.
3. Оформить
отчет.
4. Ответить
на контрольные вопросы.
Практические
задания
Задание
1
1.Добавить
на форму шесть кнопок cmdSin, cmdCos, cmdTan, cmdSqr, cmdSt и cmdLog.
Для
каждой из этих кнопок создать событийные процедуры, реализующие вычисление
соответствующих функций: синуса, косинуса, тангенса, квадратного корня,
возведения в степень и натурального логарифма.
2.
например, для возведения в степень событийная процедура cmdSt_Click() примет
вид:
Sub
cmdSt_Click()
Txt3.Text=Val(txt1.Text)^Val(txt2.Text)
End Sub
3.
Ввести самостоятельно программный код других событийных процедур с
использованием встроенных функций языка Visual Basic: Sin(), Cos(), Tan(), Sqr() и Log().
4.
Запустить проект на выполнение.
Произвести
вычисление, например 232 : ввести числа 2 и 32 и щёлкнуть по кнопке X^Y.
(Подсказка: =SQR(Val(Text1.Text)),
=Sin(Val(Text1.Text));
Задание
2
В системе программирования Visual Basic создать
программу «Треугольник», позволяющий вычислить гипотенузу и площадь прямоугольного треугольника, если известны его катеты.
Содержание
отчета
1. Название и
цели работы.
2. Макет
проекта и код программы.
3. Ответы на
контрольные вопросы.
4. Вывод.
Контрольные вопросы
1. Что
выполняет функция VAL?
2. Где
выполняются событийные процедуры?
3. Как
производится возведение в степень, квадратный корень?
4. Каким
образом обойти случай деления на ноль?
Литература
1. Браун С. Visual Basic 6.0:
учебный курс. С-Пб, "Питер", 1999 -322с
Оставьте свой комментарий
Авторизуйтесь, чтобы задавать вопросы.