Основные операторы VBA – Условные операторы

Условные операторы имеют 2 формы записи:

1) В одну строку

IF < условие> THEN <оператор 1> [ELSE <оператор 2>]

IF, THEN, ELSE –служебные неизменяемые слова, в угловых скобках < >текст пользователя, это то, что вы пишете в соответствии с заданием, в квадратных скобках [ ] необязательная часть, текст может отсутствовать. Такая форма обычно используется в случае простых действий, например, при вычислении модуля числа y=çхç= abs(s) можно использовать следующий оператор:

IF x > 0 THEN y = x ELSE y = -x

2) В несколько строк. В этом случае условный оператор обязательно заканчивается утверждением “END IF”

IF <условие> THEN

<оператор 1>

<оператор 2>

ELSE

<оператор 3>

<оператор 4>

END IF

Такая форма используется при сложных вычислениях, например, при вычислении корней квадратного уравнения. Пусть надо найти корни уравнения a*x 2 + b*x + c = 0. Как известно в случае если b 2 -4*a*c ≥ 0, то корни вычисляются по формуле , если b 2 -4*a*c ≤ 0, то корней в области действительных чисел нет. Условный оператор, реализующий этот алгоритм, выглядит следующим образом:

IF b^2 -4*a*c >= 0 THEN

X1 = (-b + (b^2 - 4*a*c)^(1/2)) / (2*a)

X2 = (-b + (b^2 + 4*a*c)^(1/2)) / (2*a)

ELSE

X1 = “ РЕШЕНИЯ НЕТ”

X2 = “ РЕШЕНИЯ НЕТ”

END IF


Понравилась статья? Добавь ее в закладку (CTRL+D) и не забудь поделиться с друзьями:  



double arrow
Сейчас читают про: