Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Программирование на BASIC / Visual Basic / Visual Basic 6.0 / БВГ / БурковВГ_Материалы_Расширений_электронных_лекций / К_лекции_Буркова_Операторы управления порядком выполнения команд.doc
Скачиваний:
48
Добавлен:
02.05.2014
Размер:
76.8 Кб
Скачать

Операторы управления порядком выполнения команд

Операторы управления порядком выполнения команд уже применялись в приме­рах. Они позволяют оценить реальную ситуацию в работающей программе и адекватно реагировать на нее, принимая решения о дальнейших действиях. Visual Basic предостав­ляет для этого ряд функций и операторов.

If...Then

Наиболее часто используется оператор If.. .Then, который может иметьпростуюодно­строчнуюили блочнуюструктуру.

Однострочный синтаксис

IfУсловиеThenОператор [ElseОператор]

Работает оператор такой структуры относительно просто. Если условие после ifис­тинно, т.е. результат равенTrue, выполняется оператор, указанный заThen. Если же ре­зультат равенFalse, то выполняется оператор, следующий за ключевым словомElse,если таковое имеется:

If A = 7 Then Beep

‘операторы

If X < 9 Then Print “False!” Else Print“True!”

В первом примере выдается звуковой сигнал, если переменная А равна 7. Во втором при­мере выводится текст False!, если значение переменной Xменьше 9; в противном случае выводится текст True!.

Блочный синтаксис

If Условие Then

[Опера торы 1]

[Else if Условие Then

[Операторы 2] Else

[Операторы 3] ] End If

В принципе блочная запись предоставляет такие же возможности, как и однострочная. Но если в зависимости от условия необходимо выполнить не простую команду, а группу операторов, следует использовать блочный синтаксис. Это относится и к ветви Else. Кроме того, блочная структура с Elself позволяет анализировать несколько условий:

If A > 5 Then

Print “Ждите”

Печать

End If

If Name = «Иванов» Then . .

Print «Ваша карточка удерживается!» Else

Print“Деньги, пожалуйста!”

End If

If Обращение = 1 Then

Print «Глубокоуважаемый господин»

Elself Обращение =2 Then

Print «Глубокоуважаемая госпожа»

Elself Обращение = 3 Then

Print «Глубокоуважаемые дамы и госпола»

Else

Print «Здравствуйте, люди»

End If

При формировании более сложных условий блочная запись удобнее. Использова­ние в этом случае блочного синтаксиса улучшает читабельность программы.

Select Case

Еще одним оператором ветвления Visual Basic является Select Case, который по­зволяет выполнить одну из нескольких групп операторов в зависимости от значения усло­вия.

Инструкция Select Caseимеет следующий синтаксис:

Select CaseПроверочное_выражение

[Case Значение1

[Операторы 1}]

[Case Значение 2

[Операторы2]]

[Case Else

[ОператорыЗ]]

End Select

Private Sub Command_Click()

nVariable=СInt(Rnd* 10) +1 ‘случайное число от 1 до 10

Select Case nVariable

Case 1

Print “Равно 1”

Case 2, 3

Print “Равно 2 или 3”

Case4 То 6

Print «Больше или равно 4 и меньше или равно6»

Case Is >= 9

Print «Больше или равно 9» Case Else

Print «Ни одно из предшествующих» End

Select End Sub

В качестве значения для блока Case можно указывать не только одно значение (1), но и несколько, разделенных запятой (2, 3). Можно определять также области сравнения (4 то 6) или воспользоваться относительным сравнением (is >= 9) Вместо непосредственного проверочного выражения можно использовать ключевое слово Is Блок Case Else выполня­ется, если ни одно из предыдущих условий не является истинным.

Если условию Select Case соответствует несколько блоков Case, товыполняется первый из них

Private Sub Commandl_Click()

Select Case nVariable Case 0

Print “Равно О” Case k10 To 10

Print “Между k10 и 10, кроме О” End Select

End Sub

Во втором блоке Case обрабатываются значения от k10 до 10, однако значение О пере­хватывается первым блоком Case. Поэтому операторы второго блока Case будут выпол­няться, если значение условия больше или равно k1 о и меньше о, а также больше 0 и меньше или равно 10.

Циклы

Для многократного выполнения одного или нескольких операторов предназначены циклы. Visual Basic предлагает две конструкции: цикл For. . .Nextдает возможность ус­танавливать число проходов цикла, а циклDo... Loopзавершается при выполнении за­данного условия.