Линейные вычислительные процессы и разветвляющиеся алгоритмические структуры на языке VBA

1. Линейные вычислительные процессы и разветвляющиеся алгоритмические структуры на языке VBA

2. ПЛАН:

1. Оператор присваивания.
2. Оператор REM.
3. Программы линейной структуры
на VBA
4. Конструкция IF... THEN... ELSE...
5. Программы разветвляющей
структуры на VBA

3.

1. Оператор присваивания
Оператор LET присваивает значение
выражения переменной или свойству:
Общий вид оператора LET:
LET X=A
где LET – служебное слово
(переводится «пусть»); в программе
может быть опущено;
X- имя переменной или имя массива;
A- выражение арифметическое или
текстовое.

4.

Значение выражения может быть
присвоено переменной, только
если оно имеет совместимый с этой
переменной тип данных.
Невозможно присвоить строковое
выражение числовой переменной
или числовое выражение
строковой переменной. Такая
попытка приведет к ошибке во
время компиляции.

5.

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

6. 2. Оператор REM REM - оператор с комментарием (от слова REMARK). Иногда вместо командного слова REM допустимо ставить одиночную

2. Оператор REM
REM - оператор с комментарием 
(от слова REMARK).
Иногда вместо командного слова 
REM допустимо ставить одиночную 
кавычку ’ – апостроф.

7. 3. Программы линейной структуры на VBA

Пример 1. Вычислить значение функции r=|c|
cos3(b-7)
Private Sub CommandButton1_Click()
Начало программы
REM Программа линейной структуры
Комментарий к задаче
c=VAL(InputBox("Введите c"))
b=VAL(InputBox("Введите b"))
Ввод значений c и b. Функция InputBox выводит на экран окно с полем
ввода и сообщением «Введите c» и возвращает значение типа строка
(String). Для преобразования вводимого значения к числовому типу
используется функция VAL.
r = Abs(c) * cos(b-7)^3
Вычисление значения переменной r.
MsgBox "Результат = " & f
Процедура MsgBox выводит на экран окно сообщений с ответом.
End Sub
Конец программы.

8.

Блок-схема линейного алгоритма:
начало
ввод c,b
r=|c|cos3(b-7).
вывод r
конец
Блок начала программы
Блок ввода
Блок оператора присваивания
Блок вывода
Блок конца программы

9.

Пример 2. Составить программу для вычисления
значения функции:
b 5c 2
x
c 8a 3
при b=15,2; c=8,7
Private Sub CommandButton1_Click()
REM Программа линейной структуры 2
а=VAL(InputBox("Введите а"))
b=15.2
с=8.7
x=(b-5*c^2)/(c+8*a^3)
MsgBox "Результат = " & x
End Sub

10. 4. Конструкция IF... THEN... ELSE... При составлении программ разветвляющего алгоритма используется конструкция для организации

4. Конструкция IF... THEN... ELSE... 
При составлении программ 
разветвляющего алгоритма используется 
конструкция для организации условного 
перехода IF... THEN... ELSE... 
(Если… То… Иначе…)  
и безусловного перехода GOTO 
(«перейти к»); 
AND («и одновременно»); 

11.

Оператор IF…THEN предписывает
выполнять некоторые действия только в
том случае, когда выполняется условие.
Это условие записывается в виде
логического выражения, а действия,
которые нужно выполнить, задаются с
помощью обычных операторов VBA.
Если выражение принимает значение
«истина», то действие, заданное
оператором выполняется. В противном
случае управление передается строке,
непосредственно следующей в
программе за оператором IF.

12.

5. Программы разветвляющей структуры на VBA

13. Блок-схема разветвляющего алгоритма

14.

15.

16.

Благодарю за внимание!