Читайте также:
|
Оператор If...Then...Else представляет собой простейшую, но и самую распространенную форму проверки условий в Visual Basic. Его сокращенная форма — оператор If...Then — имеет следующий синтаксис:
If Выражение1 Оператор Выражение 2 Then
' Выполнить некоторые действия
End If
В этом примере Оператор может быть любым из операторов, рассмотренных ранее: AND, OR, =, <>и т. д. Выражение1 и Выражение2 — переменные или константы, допускающие сравнение данным оператором. Например, сравнение строк выполняется следующим образом:
PIN = "123456"
If PIN = "123456" Then
MsgBox "Верное значение PIN"
End If
В этом случае PIN сравнивается с заранее известным значением, "123456". Если условие истинно, на экран выводится сообщение.
Иногда мы реагируем лишь на выполнение условия, но чаще приходится обрабатывать и противоположную ситуацию. Для обработки противоположных ситуаций используется оператор Else. Синтаксис выглядит так:
If Выражение1 Оператор Выражение 2 Then
Выполнить некоторые действия
Else
Выполнить другие действия
End If
Все, что вам придется сделать, — включить секцию Else после первого выполняемого блока. Затем следующий выполняемый блок размещается между ключевыми словами Else и End If. В нем выполняются действия для условия, противоположного проверяемому. В предыдущем примере это выглядело бы так:
PIN = "654321"
If PIN = "123456" Then
MsgBox "Верное значение PIN"
Else
MsgBox "Неверное значение PIN!"
End If
Итак, теперь вы знаете, как обработать условие и исключение из него. Этот полез-ный прием поможет уменьшить количество ошибок в программе. Если вам потребуется вычислить несколько условий, оператор If...Then...Else можно поместить внутри другого оператора (вложенная проверка). Вложенные операторы If...Then позволяют выполнить серию проверок в определенном порядке. Например:
If ValidUserID(UserID) Then
If ValidPassword(UserID, Password) Then
MsgBox "Неверный пароль!"
Else
MsgBox "Пользователь зарегистрирован!"
End If
Else
MsgBox "Неверное имя пользователя!"
End If
Сначала мы проверяем, что пользователь ввел правильное имя. Проверка выполняется функцией ValidUserID(). Если функция возвращает True (правильное имя), программа переходит к проверке пароля. В противном случае она извещает пользователя о том, что он ввел неверное имя.
Если функция ValidPassword() возвращает True, пользователю разрешается войти в систему. В противном случае попытка регистрации завершается неудачей. Вложенные операторы If...Then можно создать и другим способом — с помощью конструкции ElseIf:
If x = 1 Then
Выполнить некоторые действия
ElseIf x = 2 Then
' Выполнить другие действия
End If
Выбор между этими конструкциями — вопрос вкуса и/или привычки. Оба способа работают одинаково хорошо.
Дата добавления: 2015-07-20; просмотров: 88 | Нарушение авторских прав
| <== предыдущая страница | | | следующая страница ==> |
| Сравнения | | | Оператор Select Case...End Select |