Отчет_4.1
.docxМосковский технический университет связи и информатики
Кафедра информатики
Лабораторная работа по информатике №4.1
Тема: «Интегрированная среда разработки Visual Studio .NET и основные понятия»
Выполнила: Исаева Анастасия
Группа: БИН 1407
Вариант: 13
Москва 2014
Задание на разработку проекта.
Задание на разработку проекта Проект-4-1-Лаб:
Сформулируем содержательную постановку задачи:
Создать приложение на VB с именем Проект-4-1-Лаб, которое должно вычислять периметр и площадь треугольника по заданным значениям трех его сторон. То есть:
Задано:
А, В, С – значения сторон треугольника.
Требуется определить:
Р – периметр треугольника,
S – площадь треугольника.
Ограничения на значения исходных данных и их соотношения:
А>0, В>0, C>0, А+В>С, А+C>В, В+C>А одновременно.
Проект-4-1-Лаб должен иметь простой интерфейс пользователя:
• две Кнопки управления;
• три поля, отображающие входные данные;
• два поля, отображающие выходные данные.
Формализация и уточнение задания:
Для решения задачи существуют известные формулы:
Р = А + В + С;
S = (формула Герона),
где Рр = Р/2 – полупериметр.
Кроме того, при разработке интерфейса необходимо учитывать следующее:
• строка заголовка формы должна содержать название работы: Тема 4.1. Вычисление периметра и площади треугольника
• для ввода исходных данных необходимо использовать три текстовых поля;
• вычисления должны производиться при нажатии на кнопку ВЫЧИСЛИТЬ;
• для вывода результатов следует использовать текстовые поля (два поля);
• для завершения приложения должна быть предусмотрена кнопка ЗАВЕРШИТЬ;
• для удобства пользователя приложение должно содержать поясняющие надписи;
• зоны ввода и вывода данных должны быть отображены визуально.
Форма с выполненным заданием.
Код программы.
'Требование явного объявления переменных
Option Explicit On
'Подключение библиотеки математических функций
Imports System.Math
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
'Объявление переменных
Dim A, B, C As Single
Dim P, Pp, S As Single
'Присваивание переменных
B = CSng(Val(TextBox2.Text))
A = CSng(Val(TextBox1.Text))
C = CSng(Val(TextBox3.Text))
'Вычисление значений переменных
P = (A + B + C)
Pp = P / 2
S = CSng((Sqrt(Pp * (Pp - A) * (Pp - B) * (Pp - C))))
'Вывод значений
TextBox4.Text = CStr(P)
TextBox5.Text = CStr(S)
End Sub
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
End 'Завершение программы
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
'Очистка текстовых полей
TextBox1.Clear()
TextBox2.Clear()
TextBox3.Clear()
TextBox4.Clear()
TextBox5.Clear()
End Sub
End Class
Схема алгоритма.
Таблица свойств объектов.
Объект |
Имя объекта |
Свойство |
Значение свойства |
Форма |
Form1 |
Name |
Form1 |
Text |
Тема 4.1. Вычисление периметра и площади треугольника |
||
Backcolor |
192; 192; 255 (Сиреневый) |
||
Метка |
Label1 |
Text |
Тема 4.1. "Интегрированная среда разработки VisualStudio .NET и основные понятия." |
TextAlign |
2 – Center |
||
BackStyle |
0 – Transparent |
||
Font |
Comic Sans, жирный, 16 |
||
ForeColor |
Синий |
||
Метка |
Label2 |
Text |
Задание: Создать проект, вычисляющий периметр и площадь треугольника по заданным значениям трех его сторон |
TextAlign |
2 – Center |
||
BackStyle |
0 - Transparent |
||
Font |
Comic Sans, обычный, 14 |
||
ForeColor |
192; 0; 192 (Фиолетовый) |
||
Метка |
Label3 |
Text |
Введите значение сторон |
Метка |
Label9 |
Text |
Результат |
Выделить метки Label3, Label9 (клавиша <Shift> + мышь) и установить одинаковые свойства для этих меток |
TextAlign |
2 - Center |
|
BackStyle |
0 – Transparent |
||
Font |
Comic Sans, обычный, 12 |
||
ForeColor |
Зеленый |
||
Метка |
Label4 |
Text |
Сторона А |
Метка |
Label5 |
Text |
Сторона В |
Метка |
Label6 |
Text |
Сторона С |
Метка |
Label7 |
Text |
Периметр треугольника |
Метка |
Label8 |
Text |
Площадь треугольника |
Выделить метки Label4-Label8 (клавиша <Shift> + мышь) и установить одинаковые свойства для этих меток |
TextAlign |
1 - Left |
|
BackStyle |
0 – Transparent |
||
Font |
Comic Sans, обычный, 10 |
||
ForeColor |
Зеленый |
||
Текстовое поле |
TextBox1 |
Name |
TextBox1 |
Text |
Пусто (стереть значение, установленное «по умолчанию») |
||
Текстовое поле |
TextBox2 |
Name |
TextBox2 |
Text |
Пусто |
||
Текстовое поле |
TextBox3 |
Name |
TextBox3 |
Text |
Пусто |
||
Текстовое поле |
TextBox4 |
Name |
TextBox4 |
Text |
Пусто |
||
Текстовое поле |
TextBox5 |
Name |
TextBox5 |
Text |
Пусто |
||
Выделить текстовые поля TextBox1-TextBox5 |
TextBox3 |
1 – Left |
|
Font |
Comic Sans, обычный, 10 |
||
Кнопка |
Button1 |
Name |
Button1 |
Text |
ВЫЧИСЛИТЬ |
||
Кнопка |
Button2 |
Name |
Button2 |
Text |
ОЧИСТИТЬ |
||
Кнопка |
Button3 |
Name |
Button3 |
Text |
ЗАВЕРШИТЬ |
||
Выделить кнопки Button1-Button3 и установить одинаковое для кнопок свойство |
Font |
Comic Sans, обычный, 12 |
Проверка работы программы.
Результаты работы программы и вычислений в Excel совпадают.