Главная Случайная страница Контакты | Мы поможем в написании вашей работы! | ||
|
Операторы в программе-обработчике событий выполняются в той последовательности, в которой они записаны. Однако достаточно часто требуется изменить порядок выполнения операторов в зависимости от выполнения (или невыполнения) определенного условия.
Выбор одного из альтернативных путей работы программного кода в зависимости от результата проверки какого-либо условия (логического выражения) обеспечивает условный оператор If.
Условный оператор If существует в двух формах: полной и сокращенной, и схематично может быть изображен следующим образом:
Сокращенная форма | Полная форма |
Условный оператор в VB может иметь однострочную (простую) и многострочную (блочную) структуру. Однострочная структура имеет следующий синтаксис:
Сокращенная форма |
If Условие Then Оператор |
Полная форма |
If Условие Then Оператор_1 Else Оператор_2 |
Выполнение оператора заключается в следующем: если Условие имеет значение True, то выполняется оператор после ключевого слова Then, а если оно имеет значение False, то выполняется оператор, следующий за ключевым словом Else, если таковой имеется. Например,
If a= 7 Then Beep
If x < 9 Then Print ”False!” Else Print ”True!”
Многострочная структура условного оператора имеет следующий синтаксис:
Сокращенная форма | Полная форма |
If Условие Then Оператор_1 Оператор_2 ...... End if | If Условие Then Операторы для обработки истинного условия Else Операторы для обработки ложного условия End if |
Замечание. Ключевое слово End if обозначает конец многострочной конструкции.
Команда if может проверить только одно условие. Если необходимо осуществить переход управления в зависимости от результатов проверки нескольких условий, то их можно задать с помощью оператора Elseif. Оно будет анализироваться только в том случае, если предыдущее условие ложно. Например:
If x>0 Then
Label1.Caption=”Значение х положительно”
Elseif x=0 Then
Label1.Caption=”Значение х равно нулю”
Else
Label1.Caption=”Значение х отрицательно”
End If
Пример1.
Фрагмент программы | Что на экране |
A=10 If A>2 Then Print “!!!” Else Print “!” | !!! |
A=4 If A>5 Then A=A+10 Else A=A-1 Print A | 3 |
S=6 If S-8<>0 Then S=S+10 Print S | 16 |
S=6 If S<0 Then S=S+10 S=S+1 Print S |
Пример2.
If а<>4 Then
а=а+10
b=3
Print b
End If
Пример3.
If а<>4 Then
а=а+10
b=3
Print b
Else
b=0
a=b+5
c=6
End If
Пример4.
Задача. В компьютер вводится целое число а. Если а<0, то компьютер должен сказать «Число отрицательно», если а=0, то компьютер должен сказать «Вы ввели нуль», если а>100, то компьютер должен сказать «Число большое», в остальных случаях компьютер ничего недолжен говорить, а только вычислить и напечатать квадрат числа.
Программа:
Private Sub Command1_Click()
a=InputBox(“Введите число”)
If а<0 Then
MsgBox(“Число отрицательно ”) ‘ MsgBox - Выводит окно сообщения
ElseIf а=0 Then
MsgBox(“Вы ввели нуль ”)
ElseIf а>100 Then
MsgBox(“Число большое ”)
Else
Print a*a
End If
MsgBox(“До свидания! ”)
End Sub
Оператор выбора Select … Case
Оператор выбора позволяет обрабатывать в программе несколько условий и аналогичен блоку конструкций if...Then...Else. Используется он для частичного облегчения программирования задач, в которых содержится большое число различных проверок. Его также удобно применять тогда, когда выполнение одного из многочисленных действий зависит от значения какой-либо переменной.
Синтаксис оператора выбора Select … Case:
Select Case Выражение
Case Диапазон значений _1
Операторы, выполняемые при попадании Выражения в Диапазон значений _1
Case Диапазон значений _2
Операторы, выполняемые при попадании Выражения в Диапазон значений _2
...
Case Диапазон значений _N
Операторы, выполняемые при попадании Выражения в Диапазон значений _2
[ Case Else
Операторы, выполняемые при непопадании ни в один из указанных
диапазонов]
Дата публикования: 2014-12-28; Прочитано: 278 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!