Разработка алгоритма задачи. Рисунок 4.1 представляет алгоритм решения задачи в виде блок-схемы.

⇐ Предыдущая 1 2 34

Рисунок 4.1 представляет алгоритм решения задачи в виде блок-схемы.

Рисунок 4.1 – Блок-схема алгоритма задачи 3

4.3 Разработка интерфейса

На рисунке 4.2 представлен интерфейс формы проекта.

Рисунок 4.2 – Интерфейс формы для задачи 3

При создании интерфейса были использованы следующие элементы управления:

Элемент управления	Использование в проекте
Form4	Окно для решения 3 задачи
TextBox1,2	Ввод исходных данных-параметров a,b
TextBox3	Вывод результата с выбранной арифметической операции
Label11,12,13	Для вывода пояснений
Panel11,12	Для объединения элементов управления
RadioButton1,2,3,4	Для выбора одного переключателя из группы(выбор арифметической операции)
CheckBox1	Для выбора формата вывода результата
Button1	Для запуска программного кода расчета для выбранной арифметической операции
Button2	Для запуска программного кода завершения работы формы

На этапе проектирования у элементов управления были изменены следующие свойства:

Элемент управления	Изменённые свойства
Form4	Text BackColor- цвет формы Font Size-12
Label11,12,13	Text
Panel1	BackColor-цвет панели
RadioButton1	Text AutoCheck-true
RadioButton2,3,4	Text
CheckBox1	Text Checked -true
Button1	Text
Button2	Text

Программирование

Программа написана в соответствии с алгоритмом, представленном в виде блок-схемы (рисунок 4.1). Ниже представлен программный код решения задачи 3.

Public Class Form4 Private Sub Label3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label3.Click End Sub Private Sub RadioButton4_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton4.CheckedChanged End Sub Private Sub Form4_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim c, a, b As Double a = Val(TextBox1.Text) b = Val(TextBox2.Text) c = 0 If RadioButton1.Checked Then c = a + b If RadioButton2.Checked Then c = a - b If RadioButton3.Checked Then c = a * b If RadioButton4.Checked Then If b = 0 Then c = Double.NaN: MsgBox("На ноль делить нельзя") Else: c = a / b End If End If If CheckBox1.Checked Then TextBox3.Text = Format(c, "0.00") Else: TextBox3.Text = Str(c) End If End Sub End Class

В программе используются: оператор присваивания (=); оператор разветвления If... Then для определения какая арифметическая операция выбрана и как будет организован вывод результата, и стандартные методы:

- Val–дляпреобразованиястрокисимволоввчисло;

- Str–дляпреобразованиявещественногочиславстрокусимволов.

Рисунок 4.3 представляет результат работы программы.

Рисунок 4.3 – Результат выполнения программы для задачи 3 4.5 Тестирование и отладка

В результате выполнения задания были исправлены синтаксические и семантические ошибки, а также проведено тестирование. Рисунок 4.4 и рисунок

4.5 показывают результаты проведенного тестирования.

Рисунок 4.4 – Тестирование задания 3

Рисунок 4.5 – Тестирование задания 3 (продолжение)

Заключение

При выполнении лабораторной работы я научился создавать многооконные приложения, каждая форма которого предназначена для решения одной задачи индивидуальных заданий по варианту No 1:

1. Создана форма, программный код которой вычисляет значение функции (0.1) для заданного пользователем аргумента.

2. Создана форма, программный код которой позволяет пользователю вводить исходные данные и выбирать расчетную формулу (3.1) с помощью компонента RadioButton.

3. Создан калькулятор, позволяющий осуществлять четыре основные арифметические операции: +, -, *, /. Операция выбирается с помощью компонента RadioButton. Возможен форматный вывод и бесформатный вывод результата (используется компонент CheckBox)

⇐ Предыдущая 1 2 34

Не нашли, что искали? Воспользуйтесь поиском:

vikidalka.ru - 2015-2024 год. Все права принадлежат их авторам! Нарушение авторских прав | Нарушение персональных данных