Условный логический оператор

Условный логический оператор записывается в виде:

IfусловиеThen

оператор или операторы

Else

оператор или операторы

End If

Условие - это логическое выражение, которое может принимать только одно из двух значений: истина или ложь. Частным случаем логического выражения является отношение - операция сравнения двух величин. В таблице 2 приведены принятые в VBAобозначения операций отношения. Оператор выполняется следующим образом. Вычисляется значение логического выражения (условия). Если это значение есть "истина", то выполняется оператор или группа операторов, записанных после ключевого словаThen, иначе управление работой программы передается на операторы, которые следуют за словомElse. Заканчивается оператор словамиEndIf

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

Таблица 2

Операция	Больше	Меньше	Равно	Не равно	Больше или равно	Меньше или равно
Обозначение	>	<	=	<>	>=	<=

Пример.

If x>0 Then

a = 1 + x

b = 1

Else

a = 1 – X

b = 2

End If

Слово Elseи следующие за ним оператор или операторы можно опустить. В этом случае условный оператор записывается в виде:

If (условие)Then

оператор или операторы

End If

Пример:

If ( x>0) Then

GoTo M1

End If

Строчный условный оператор

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

If условие Then оператор

Примеры.

If а>b Then y=x^2+1

If x>0 Then go to M5

Последняя запись означает: если х больше нуля, то должен выполняться оператор, помеченный меткой M5.

Пример

Разработать программу вычисления функции f(x) для аргумента x, изменяющегося от 0 до 1 с шагом Dx равным 0,25.

Программа.

Приведенная программа выполняется следующим образом. Аргументу x присваивается значение 0. Вычисляется функция f. В окно отладки выводятся значения x и f. После этого аргумент x увеличивается на 0.25. Теперь необходимо перейти к оператору, помеченному меткой М5, и повторить вычисления, используя новое значение x. Но прежде надо проверить условие окончания расчета. Для этого в программе используется отношение x < 1.125. Здесь текущее значение аргумента х сравнивается с числом, несколько большим его заданного конечного значения. Дело в том, что в ПК любое вещественное число изображается ограниченным количеством цифр. Поэтому некоторые константы, например 1/3, не могут быть точно представлены в машине. Из-за этого арифметические операции в компьютере выполняются с ошибками округления. После многократного увеличения х на 0.25 эта переменная получит значение 1±e, где e - ошибка вычисления. Использование отношения x <= 1.0 может привести к тому, что при заданном конечном значении аргумента функция не будет вычисляться, так как x окажется равным 1+e, т.е. больше 1. При проверке условия на окончание вычислений следует сравнивать аргумент не с заданным конечным его значением, а с числом несколько большим, например, большим на половину шага. Программа и результаты расчета приведены на рисунке 4.

Пример 5. Вычислить значение функции F(x) для аргумента х, значение которого вводится в окне ввода.

F(x)=a sin x,

где а=1+x, если x>0 и а=1-x, в остальных случаях.

Программа.

Sub Пример_5 ()

x = InputBox(“Введите х”,”Пример_5”)

If x>0 Then

a=1+x

Else

a=1-x

End If

F = a*SIN(x)

Debug.Pint ”x=”; x, ”F=”; F

End Sub

Рис.4

Пример 6. Разработать программу вычисления функции f:

Значения переменных x и y ввести с клавиатуры. Результат расчета вывести на экран в окно отладки. Программа и результаты расчета приведены на рисунке 5. Так следует записывать текст задания №2.

Рис.5