Практическая работа №3 «Арифметические выражения».
Задачи ПР №3. Познакомится, как записываются производятся четыре арифметических действия над числами (сложение, вычитание, умножение и деление).
Что делать. Создать проект Калькулятор.
Как делать.
Работа над проектом начинается с создания графического интерфейса, для этого в окне Конструктор форм на форму помещаются управляющие элементы.
Для этого необходимо в режиме конструирования проекта последовательно выделить объекты графического интерфейса и с помощью диалоговой панели Свойства объекта (Properties) установить новые значения некоторых свойств для каждого объекта:
1.Для создания графического интерфейса проекта разместим на форме два текстовых поля Textl и Text2 для ввода числовых данных и одну метку Labell для вывода результата, а также четыре кнопки Commandl, Command2, Command3 и Command4 для создания событийных процедур: сложения, вычитания, умножения, деления( см рис.).
Объект | Свойство | Значение по умолчанию | Новое значение |
Form1 | Text | Form1 | Простой калькулятор |
BackColor | Серый | Зеленый | |
Command1 | Caption | Command1 | + |
Command2 | Caption | Command2 | - |
Command3 | Caption | Command3 | * |
Command4 | Caption | Command4 | / |
Text1 | Text | Text1 | |
Alignment | Left Justify | Right Justify | |
Font | MS Sana Serif, обычный, 8 | MS Sana Serif, обычный, 18 | |
Text2 | Text | Text2 | |
Alignment | Left Justify | Right Justify | |
Font | MS Sana Serif, обычный, 8 | MS Sana Serif, обычный, 18 | |
Label1 | Caption | Label1 | |
Font | MS Sana Serif, обычный, 8 | MS Sana Serif, обычный, 18 |
3. Для кнопок Command1, Command2, Command3, Command4 ввести программой код
Для Command1
Private Sub Command1_Click()
Label1.Caption = Val(Text1.Text) + Val(Text2.Text)
End Sub
Для Command2
Private Sub Command2_Click()
Label1.Caption = Val(Text1.Text) - Val(Text2.Text)
End Sub
Для Command3
Private Sub Command3_Click()
Label1.Caption = Val(Text1.Text) * Val(Text2.Text)
End Sub
Для Command4
Private Sub Command4_Click()
Label1.Caption = Val(Text1.Text) / Val(Text2.Text)
End Sub
Запустите проект. Сохраните проект
3.Практическое задание. В системе программирования Visual Basic создать проект «Треугольник», позволяющий вычислить гипотенузу и площадь прямоугольного треугольника, если известны его катеты.
