Оператор условного перехода

Оператор условного перехода задает выполнение определенных групп инструкций в зависимости от значения выражения.

Синтаксис.

If Условие Then [Инструкция] [ Else Инструкция_ else ]

Если Условие принимает значение True, то выполняется Инструкция, если False, то Инструкция_ else. Ветвь является необязательной.

Пример.

If Сумма>1000 Then Скидка=0.5 Else Скидка=0.5

If Сумма>1000 Then Скидка=0.5

Допускается использование блочной формы оператора условного перехода.

Синтаксис.

If Условие Then

 [Инструкция]

[ Else

[Инструкция_ else ]]

End IF

При сложном условии используется оператор If – Then – ElseIf , который позволяет проверять множественные условия.

Синтаксис.

If Условие1 Then

 [Инструкция1]

[ Elseif Условие2

 [Инструкция2]…

[ Else

[Инструкция_ else ]]

End IF]

Пример. Определение, какому интервалу принадлежит вводимое число.

x = InputBox (“ Введите число ”)

If 0<=x And x<=1 Then

MsgBox “Число из интервала от 0 до 1”

Elseif 1<x<=2 Then

MsgBox “Число из интервала от 1 до 2”

Else

MsgBox “Число отрицательное, либо больше 2”

End if

Оператор выбора

Оператор выбора выполняет одну из нескольких групп инструкции, в зависимости от значения выражения.

Синтаксис.

Select Case Выражение

[ Case СписокВыражений-1

[Инструкции-1]]

…

[ Case СписокВыражений- n

[Инструкции- n ]]

[ Case Else

[ Инструкции _Else] ]

End Select

· СписокВыражений — это список с разделителями, состоящий из одной или нескольких форм следующего вида: Выражение, Выражение То Выражение, -Is ОператорСравнения Выражение, где Выражение — это любое числовое или строковое выражение. Ключевое слово То задает диапазон значений. При использовании ключевого слова То перед ним должно находиться меньшее значение. Ключевое слово Is с операторами сравнения задает диапазон значений. Если ключевое слово Is не указано, оно вставляется по умолчанию.

· Инструкции — это одна или несколько инструкций, выполняемых в том случае, если выражение совпадает с любым компонентом списка от СписокВыражений-1 ДО СписокВыражений-n

· Инструкции_Else — одна или несколько инструкций, выполняемых в том случае, если выражение не совпадает ни с одним из предложений Case.

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

Пример. Использования оператора выбора Select Case

Число = InputBox ("Введите целое число")

Select Case Число

Case 1

MsgBox " Число равно 1"

Case 2,3

MsgBox "Число равно 2 или 3"

Case 4 То 6

MsgBox "Число от 4 до 6"

Case Is >= 7

MsgBox "Число не менее 7"

End Select

Оператор For – Next

Оператор For – Next повторяет выполнение группы инструкции, указанное число раз. Число повторений определяется от Начало до Конца с указанным Шагом. Если Шаг не указан, то он полагается равным 1. Досрочный выход из цикла осуществляется оператором Exit Next

Синтаксис.

For Счетчик = Начало То Конец [Step Шаг]

[Инструкции]

[Exit For]

[Инструкции]

Next [Счетчик]

Задание 1. Вычисление n факториала

Sub Factor ()

N=20

Fact=1

For i=1 To n

Fact = Fact * i

Next i

MsgBox Format (Fact,"############")

End Sub

Задание 2. Суммирование элементов выделенного диапазона

With Selection

n = .Rows.Count

m = .Columns.Count

End With

S = 0

For i = 1 to n

For j = 1 to m

s = s +Selection.Cells(i,j).Value

Next j

Next i

With Selection. End(xlDown)

.Offset(1,0).Value = “ Сумма ”

.Offset(1,1).Value = s

End With

Оператор For – Each

Оператор For Each повторяет выполнение группы инструкций для каждого элемента массива или семейства.

Синтаксис:

⇐ Предыдущая6789101112131415Следующая ⇒

Поделиться: