- •Программирование в Microsoft Excel Лабораторная работа №1 Основы программирования
- •1.1. Интегрированная среда разработки Visual Basic for Application
- •1.2. Основы программирования на vba
- •1.2.1. Структура программы на vba
- •1.2.2. Переменные
- •1.2.3. Оператор присваивания
- •1.2.4. Операции с переменными числовых типов данных
- •1.2.5. Операции с переменными строкового типа
- •1.2.7. Пользовательский тип данных
- •1.2.8. Константы
- •1.2.6. Операции с логическими переменными
- •1.2.9. Перечисление констант
- •1.2.10. Комментарии
1.2.3. Оператор присваивания
Оператор присваивания назначает переменной значение выражения. Выражение и переменная должны быть совместимы по типу данных. Оператор присваивания содержит знак присваивания = и имеет следующий вид:
Переменная = выражение
Оператор присваивания выполняется справа налево, то есть сначала вычисляет значение выражения, а затем присваивает его переменной. Например,
Х = 2
Х = Х * 2
В результате переменной Х будет присвоено значение 4.
При использовании переноса операторов нельзя разрывать знаком переноса строки в кавычках и имена переменных.
1.2.4. Операции с переменными числовых типов данных
При выражениях с переменными числовых типов используются следующие арифметические операции и функции:
Number1 + Number2 - сложение
Number1 – Number2 - вычитание
-Number - перемена знака
Number1 * Number2 - умножение
Number1 / Number2 - деление
Number1 ^ Number2 - возведение в степень.
Приоритет выполнения арифметических операций - как принято в математике, с регулированием скобками.
Abs(number) – абсолютная величина числа
Atn(number) – арктангенс
Cos(number) – косинус
Exp(x) – е в степени х
Log(number) – натуральный логарифм
Sgn(number) – знак числа
Sin(number) – синус
Sqr(number) – квадратный корень из числа
Tan(number) – тангенс
Fix(number), Int(number) – обе функции отбрасывают дробную часть числа и возвращают целое значение. Различие между данными функциями состоит в том, что для отрицательного значения параметра функция Int возвращает ближайшее отрицательное целое число, меньшее или равное указанному, а Fix– ближайшее отрицательное целое число, большее либо равное указанному.
Аргументы функций Sin(), Cos() и Tan() задаются в радианах.
Рассмотренные операции и функции применяются как при работе с вещественными переменными, так и при работе с целочисленными переменными. В то же время, при работе с переменными типа Integer (целое число) и Long (длинное целое число) операция
Number1 / Number2
возвращает целочисленный результат: 5/2 возвращает 2.
Есть также дополнительные операции для работы только с целочисленными переменными:
Number1 \ Number2 - целочисленное деление. Например, 7\4 возвращает 1.
Number1 mod Number2 - остаток от деления по модулю. Например, 7 mod 4 возвращает 3
Пример
программы, вычисляющей выражение
:
Sub M()
Dim g As Single, x As Single, y As Single
x = 2: y = 4
g = Sqr(Exp(2 * x + y))
MsgBox g
End Sub
В этой программе применены уже рассмотренные операторы, кроме оператора MsgBox, который будет подробно рассмотрен далее. Он выводит значение переменной g как сообщение в диалоговом окне на экране
Пример программы с использованием встроенной функции Sin(синус), вычисляющей выражение
(1)
и выражение
(2)
:
Function FSin()
Dim F1Sin As Single, F2Sin As Single, f As Single
f = 45
F1Sin = Sin(3.14 / 180 * f)^2
MsgBox F1Sin
F2Sin = Sin((3.14 / 180 * f)^2)
MsgBox F2Sin
End Function
Задание 1.
По рассмотренным примерам сделайте программу, вычисляющую выражения
,
,
,
где
,
и выводящую их значения на экран
