Разработка программы с оператором условия 


Мы поможем в написании ваших работ!



ЗНАЕТЕ ЛИ ВЫ?

Разработка программы с оператором условия



Цель занятия – изучение работы конструкции условия
If… Then.

 

Конструкция условия If...Then применяется в том случае, когда необходимо выполнить один или группу операторов при соблюдении определенного условия, то есть когда значение заданного условия равно Истина (True).

If условие Then конструкция

If y > 20 Then y = 2

 

Конструкция If...Then...Else аналогична конструкции If...Then, но позволяет задать действия, исполняемые как при выполнении условий, так и в случае их невыполнения.

Конструкция имеет следующий синтаксис:

If условие Then

Конструкции для обработки истинного условия

Else

Конструкции для обработки ложного условия

End If

Ключевые слова If и End if имеют тот же смысл, что и в конструкции If...Then. Если заданное в конструкции условие не выполняется и конструкция содержит ключевое слово Else, Visual Basic выполнит последовательность конструкций, расположенных непосредственно за Else. После чего управление перейдет к конструкции, следующей после End If.

Например:

 

If x >= 0 Then

Label1.Caption = "Значение больше или равно 0"

Else

Labell.Caption = "Значение меньше 0"

End If

Для выбора одного из нескольких значений используются объекты типа OptionButton, которые называются переключателями.

При размещении в форме нескольких групп переключателей каждая логическая группа должна помещаться в объект-контейнер, например Frame (Рамка). В этом случае, для создания в форме группы переключателей необходимо сначала поместить в форму рамку, а затем разместить в ней поочередно необходимое количество переключателей, используя для этого кнопку OptionButton на панели элементов управления.

В качестве примера рассмотрим разработку программы расчета среднего или поиска максимума из площадей пожаров.

Входные данные: площади 2 пожаров (А, В).

Выходные данные: средняя площадь (Avg) или максимум (Max).

Разработка алгоритма:


Диалоговая форма программы

Спроектируйте диалоговую форму программы с использованием элементов управления (рис. 2.12).

На форме располагаются 1 рамка (Выбор операции), 2 переключателя (Средняя площадь и Максимум), 3 текстовых надписи, 2 текстовых поля для ввода чисел, 1 - для вывода результата; 2 кнопки: 1 для выполнения операции (ОК), 1 для выхода из программы (Выход).

В окне свойств объектов определите свойства каждого элемента управления:

Таблица 2.7

Свойства элементов управления

Элемент управления Свойство Имя Свойство Caption
Форма Form1 Вычисления
Рамка Frame1 Выбор операции
Переключатель1 Option1 Средняя площадь
Переключатель2 Option2 Максимум
Надпись1 Label1 Площадь 1 пожара
Надпись2 Label2 Площадь 2 пожара
Надпись3 Label3 Результат
Текстовое поле1 Площадь1 -
Текстовое поле2 Площадь2 -
Текстовое поле3 Результат -
Кнопка1 Command1 ОК
Кнопка2 Command2 Выход

Программный код

 

'Процедура расчета среднего значения и поиска максимума

Private Sub Command1_Click()

'Вычисление среднего

If Option1.Value = True Then

Результат.Text = (Val(Площадь1.Text) + Val(Площадь2.Text)) / 2

ElseIf Option2.Value = True Then

'Поиск максимума

If Val(Площадь1.Text) > Val(Площадь2.Text) Then

Результат.Text = Val(Площадь1.Text)

Else: Результат.Text = Val(Площадь2.Text)

End If

End If

End Sub

'Процедура завершения программы

Private Sub Command2_Click()

End

End Sub

Практическое задание

1. Дополнительно создайте операцию поиска минимального из площадей пожаров.

 

Контрольные вопросы

 

1. Объясните работу конструкции If.. Then.

2. Объясните работу конструкции If.. Then.. Else.

3. Объясните работу элемента управления Option Button.

 

 

Лабораторная работа 4



Поделиться:


Последнее изменение этой страницы: 2017-02-07; просмотров: 206; Нарушение авторского права страницы; Мы поможем в написании вашей работы!

infopedia.su Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав. Обратная связь - 3.234.177.119 (0.05 с.)