Условный оператор If

Условный оператор If позволяет проверить некоторое условие. В зависимости от результата проверки выполняется одно действие или другое.

Формат однострочной записи оператора If If УсловноеВыражение Then Оператор1 [Else Оператор2 ] где УсловноеВыражение — любое логическое выражение.

Например: Краткая форма записи оператора

If A>B then A=2*A

В примере проверяется условие А>В. Если условие выполняется, то значение переменной А удваивается

Например: Полная форма записи оператора:

If A > В Then A=2*A Else B=B*2

If A <= В Then B=B*2 Else A=2*A

Оба кода выполняют одни и те же действия, и не имеет значения, какой из них выбрать. В данном примере при условии, что А > В, значение переменной А удваивается, в случае если А <= В, удваивается значение переменной В.

Например: Проверить, соответствует ли значение переменной True, можно следующими способами:

If Flag=True Then...

или

If Flag Then...

Формат многострочной записи оператора If If УсловноеВыражение Then < Последовательность Операторов1 > [Else < Последовательность Операторов2 >] End If

Например: Краткая форма записи оператора:

If ПравильныйОтвет = True Then

Rezult =True

lblОтвет ="Молодец! Ответ верный"

End If

В данном примере, если значение переменной ПравильныйОтвет = True, то переменной Rezult присваивается значение True и в метку lblОтвет вводится текст "Молодец! Ответ верный"

Например: Полная форма записи оператора:

If imgl.Visible=True Then

lblОтвет. Сарtion="Молодец! Ответ верный"

img 1.Visible=False

img2.Visible=True

Else

lblОтвет. Сарtion ="Неверно, попробуй еще раз"

End If

В данном примере проверяется, виден ли объект imgl. Если виден, то в метке lblОтвет пишется текст "Молодец! Ответ верный", объект imgl делается невидимым, объект img2 видимым, в противном случае в метке lblОтвет пишется текст "Неверно, попробуй еще раз". Между строками If...Then и Else, а также Else и End If можно ввести любое количество операторов.

Рекомендация. Считается хорошим тоном выделять структуру операторов отступами, как это сделано в приведенных выше примерах. Это сделает Ваши программы "читабельными", в них будет легче разобраться.

Для анализа нескольких условий в структуру блочного оператора If...Then включаются строки (строка): Elself УсловноеВыражение Then

Формат блочного оператора If If УсловноеВыражение1 Then ПоследовательностьОператоров1 [Elself УсловноеВыражение2 Then ПоследовательностьОператоров2 …… [Elself УсловноеВыражениеN Then ПоследовательностьОператоровN-1 [Else ПоследовательностьОператоровN ]] End If