Оператор присваивания

Прежде чем использовать переменную в программе, ей необходимо присвоить значение. Самый простой способ присвоения заключается в использовании оператора присваивания " = ", который имеет следующий синтаксис:

«переменная» = «выражение»

«переменная» задает имя переменной, которой будет присвоено значение выражения, стоящего справа от знака равенства.

Например:

А = 77

В = "программа"

Математические операторы

Выполнять действия над числами позволяют математические операторы, которые представлены в таблице 1.

Таблица 1

Математические операторы

Оператор	Выполняемая операция
+	Сложение
-	Вычитание
*	Умножение
/	Деление
\	Целочисленное деление
Mod	Остаток от деления нацело
^	Возведение в степень

 

Функция InputBox

Функция InputBox предназначена для вывода диалогового окна с приглашением ввести текст и возвращения введенного значения типа String с содержимым текстового поля.

Синтаксис функции

 [<p>=] InputBox (<сообщение> [,<заголовок>] [,<строка по умолчанию>] [,X][,Y] [,<справка>])

Обязательным параметром функции InputBox является <сообщение>, если значения остальных параметров явно не указаны, используются их значения по умолчанию. X,Y - координаты левого верхнего угла.

Функция MsgBox

Функция MsgBox предназначена для вывода сообщения в диалоговом окне, ожидания нажатия кнопки и возврата значения типа Integer, указывающего на то, какая кнопка была нажата.

[<p>=] MsgBox (<сообщение> [,<кнопки и значения>] [,<заголовок окна>] [,<справка, раздел>])

p - переменная, которой присваивается код возврата.

Обязательным параметром функции MsgBox является <сообщение>, имеющее тип String, отображаемое в диалоговом окне в виде сообщения. Сообщение можно разделить на строки с помощью константы vbNewLine.   Обратите внимание, что круглые скобки используются для описания параметров в том случае, если код возврата присваивается переменной,

Например: Создать код, вычисляющий сумму двух переменных.

Sub Пример ()

Dim x1 As Integer, x2 As Integer, x As Integer

x1 = InputBox("Введите первое слагаемое")

x2 = InputBox("Введите второе слагаемое ")

x = x1 + x2

MsgBox ("Сумма двух слагаемых равна: " & x)

End Sub

Сохранение файла содержащего макрос

Чтобы иметь доступ к макросам, сохраненным в файле, его необходимо сохранить с поддержкой макросов. Для этого необходимо выполнить команду: «Кнопка office - Сохранить как - Книга Excel с поддержкой макросов» (Рисунок 5).

Рисунок 5. - сохранение макроса

Варианты заданий

Вариант	Задание
	Программа вычитания
	Программа деления
	Программа умножения
	Программа целочисленного деления
	Программа возведения в степень
	Программа нахождения остатка от деления нацело