Программный выбор между двумя возможностями

Оператор If... Then

На этом занятии будет рассказано об использовании оператора If...Then для запуска кода на основе заданных условий.

Программам требуется выполнять различные действия в зависимости от различных условий. Например, программе может понадобиться проверить, какой сегодня день недели, и затем сделать что-нибудь в зависимости от этого. Оператор If...Then позволяет проверять условие и затем выполнять различные фрагменты кода на основе результатов этой проверки.

В следующем примере показано, как работает оператор If...Then.

If My.Computer.Clock.LocalTime.DayOfWeek = DayOfWeek.Monday Then MsgBox("Today is Monday!")End If

При выполнении кода проверяется условие (часть между If и Then). Если условие истинно, выполняется следующая строка кода и отображается окно сообщения; если нет, управление передается строке End If. Другими словами, код значит следующее: "Если сегодня понедельник, то нужно отобразить сообщение".

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

Для использования инструкции If... Then

1. В меню Файл выберите команду Создать проект.

2. В диалоговом окне Создать проект в области Шаблоны выберите Приложение Windows.

3. В поле Имя введите IfThen и нажмите кнопку ОК.

Откроется новый проект Windows Forms.

4. Дважды щелкните форму, чтобы открыть редактор кода.

5. В обработчике событий Form1_Load введите следующий код.

If My.Computer.Clock.LocalTime.DayOfWeek = DayOfWeek.Saturday Or _ My.Computer.Clock.LocalTime.DayOfWeek = DayOfWeek.Sunday Then MsgBox("Happy Weekend!")End If

6. Нажмите клавишу F5 для запуска приложения.

Если текущим днем является суббота или воскресенье, появляется окно сообщения с текстом Happy Weekend!, в противном случае окно сообщения не отобразится.

7. В меню Отладка нажмите кнопку Остановить отладку для завершения программы. Оставьте этот проект открытым. На следующем занятии, рассказывающем об использовании инструкции Else, необходимо будет внести в него добавления.

Можно заметить, что в приведенном выше примере оператор If...Then использует оператор Or для проверки нескольких условий ("сегодня суббота Or сегодня воскресенье"). Можно использовать сколько угодно операторов Or и And для проверки необходимого количества условий в одном операторе If...Then.

Предложение Else

Выше было рассмотрено, как использовать оператор If...Then для запуска кода, если условие имеет значение истина. Но что делать, если необходимо запустить один набор кода, если условие истинно, и другой, если условие ложно? В этом случае можно использовать предложение Else. Предложение Else позволяет указать блок кода, который будет выполняться в том случае, если условие ложно. В следующем примере показано, как работает предложение Else.

If My.Computer.Clock.LocalTime.DayOfWeek = DayOfWeek.Friday Then MsgBox("Today is Friday!")Else MsgBox("It isn't Friday yet!")End If

В этом примере вычисляется выражение; если оно имеет значение "true", то выполняется следующая строка кода и отображается первое окно сообщения. Если оно имеет значение "false", код до предложения Else пропускается и выполняется строка, следующая за Else, то есть отображается второе окно сообщения.

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

Эта процедура начинается там, где заканчивается процедура "Для использования оператора If... Then". Если раздел "Для использования оператора If... Then" не был завершен, необходимо сделать это перед продолжением.