Что такое переменная и как правильно её объявить? Основные формы операторов различных DefType. Область действия переменных и констант

Оператор DIM

Если в задаче обрабатываемые данные организуются в виде массивов, в этом случае интерпретатору требуется сообщить информацию, необходимую для распределения памяти под массивы, используемые в программе. Для этого используется оператор DIM.

Формат: DIM a1(m1), a2(m2),..., aN (mN)

ai - имя массива;

mi - список параметров, задающих максимальные значения индексов массива. Список mi может содержать одну или две целые константы или переменные, разделенные за пятыми, а также арифметические выражения. Индексы из меняются от 0 до максимального.

Пример: DIM A(4), B(5,8), A1$(5), B1$(3,4)

Оператор DIM описывает числовые массивы A и B, символьные массивы A1$ и B1$. Массив A одномерный и содержит 5 элементов A(0), A(1), A(2), A(3), A(4). Двумерный числовой массив B содержит 6 строк и 9 столбцов. Символьный одномерный массив A1$ состоит из 6 элементов. Символьный двумерный массив B1$ состоит из 20 элементов (4 строки, 5 столбцов).

Обработка массивов в языке BASIC проводится поэлементно. Оператор DIM, описывающий массив, должен быть расположен в программе до первого оператора, использующего его элементы.

Если в одномерном массиве не более 11 элементов, а в двумерном не более 11 строк и 11 столбцов, то такие массивы можно не описывать.

В качестве максимальных индексов можно использовать имена переменных. Но значения переменным должны быть присвоены до оператора DIM.

Пример 1: Пример 2:

10 INPUT N,K 10 INPUT N,М

20 DIM A(N),B(K,N) 20 DIM A(N+1,М)

Пример 3: Даны одномерные массивы A и B, содержащие по N элементов. Сформировать новый массив D, каждый элемент которого определяется по формуле

D(i)=A(i)+B(i)+C(i), i=1,2,.....,N

10 INPUT "Введите размерность массивов" ;N

20 DIM A(N),B(N),C(N),D(N)

40 INPUT A(I),B(I),C(I)

70 D(I)=A(I)+B(I)+C(I)

80 PRINT "D(";I;")=";D(I);

Блоки данных

а) Оператор DATA

Оператор DATA предназначен для создания блока данных.

Формат: DATA A

DATA - ключевое слово;

А - список, содержащий одну или более вещественных, целых или строковых констант, разделенных запятыми (строковые константы необязательно заключать в кавычки).

Оператор DATA создает в оперативной памяти ЭВМ блок данных. Информация в блок данных записывается в том порядке, в котором она располагается в списке. Если в программе используется не сколько операторов DATA, то формируется блок данных путем последовательного сцепления значений из списков в порядке появления операторов.

Пример: 20 DATA 2, 5.6, программа

........................

50 DATA 8, пример, 37.6, 5

В блоке данных будет 7 элементов: 2, 5.6, программа, 8, пример, 37.6, 5

Б) оператор READ

Для чтения информации из блока данных предназначен оператор READ.

Формат: READ V

READ - ключевое слово;

V - список имен одной или более переменных, разделенных запятыми.

Блок данных организован таким образом, что обеспечивает последовательный доступ к хранящейся в нем информации с помощью внутреннего указателя. Текущее положение указателя показывает на элемент блока данных, который непосредственно доступен для чтения. При запуске программы указатель устанавливается на начальный элемент блока. При работе оператора READ первый элемент блока данных из списка оператора DATA присваивается в качестве значения переменной, имя которой расположено первым в списке оператора READ, а указатель смещается на следующую позицию и указывает теперь на второй элемент блока данных. Если в списке оператора READ имеется еще одно имя переменной, то второй элемент будет присваиваться ей в качестве значения. Затем указатель перемещается на следующую позицию, и процесс повторяется до тех пор, пока список оператора READ не закончится.

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

Пример: 30 READ A, B

100 READ E$, F, G

A = 2 B = 5.6 C = "программа"

D = 8 E = "пример" F = 37.6 G = 5

DATA - единственный оператор языка BASIC, номер строки которого не влияет на порядок выполняемых действий. Номер строки нужен лишь для того, чтобы был выдержан общий формат программы.

Только оператор READ определяет, когда и какие данные должны быть считаны.

в) Оператор RESTORE

Для возврата указателя в начало блока данных служит опера тор RESTORE.

Формат: RESTORE или RESTORE N

N - номер строки, содержащей оператор DATA.

Использование этого оператора позволяет многократно считывать одни и те же данные различными операторами DATA и присваивать их в качестве значений разным переменным.

40 DATA 2, 4, 8, 3, -6, 4

A = 2, A1 = 4, A2 = 8, указатель на числе 3, но RESTORE возвращает его на первое число, таким образом B = 2, B1 = 4 .

Если в операторе RESTORE указать номер строки, содержащей оператор DATA, то указатель отметит первое значение. После того как RESTORE изменит положение указателя, любой последующий READ начнет чтение данных с новой указанной позиции.

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

Подпрограммы языка basic

а) Операторы GOSUB и RETURN

При написании программ часто возникает необходимость в вы полнении одних и тех же действий в различных местах программы. Во многих случаях эти действия должны производиться с различными исходными данными. Написание такой программы упростится, если записать повторяющийся участок вычислений один раз, а потом обращаться к нему из различных мест программы. Такую возможность обеспечивает использование подпрограмм.

В языке BASIC обращение к подпрограмме осуществляется оператором GOSUB.

Формат: GOSUB N

GOSUB - ключевое слово;

N - номер первой строки, с которой должно начаться выполнение подпрограммы (точка входа в подпрограмму).

Последним выполняемым в подпрограмме оператором должен быть оператор RETURN, возвращающий управление в основную программу.

Работа операторов GOSUB и RETURN происходит следующим образом. Интерпретатор языка BASIC формирует стек возврата. Когда в программе встречается оператор GOSUB, интерпретатор заносит в стек возврата адрес (номер строки) оператора, следующего непосредственно за GOSUB. Затем управление передается на точку входа, заданную номером строки в операторе GOSUB, и начинают выполняться операторы подпрограммы. Если в подпрограмме встречается оператор RETURN, то из вершины стека извлекается текущий адрес возврата, и интерпретатор передает управление в вызывающую программу на оператор, непосредственно следующий за оператором GO SUB.

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

10 REM основная программа

30 PRINT "Введите количество хозяйств"

60 PRINT "Введите посевную площадь в хозяйстве" ;I

90 PRINT "Введите нижнюю границу посевной площади" 100 INPUT D

120 PRINT "Количество хозяйств с посевной площадью >"; D;"=" ; K

200 REM Подпрограмма

220 FOR I=1 TO M

Английское слово DIMENSION, от которого и берется сокращение DIM, означает «размерность», «размер». Этот оператор нужен для уточнения и определения переменных, с которыми работает программа. Дело в том, что по умолчанию (так называемый default, который нехорошо ассоциируется с датой 19 августа 1998 года) QB пользуется обычными переменными одинарной точности. Если, скажем, нам понадобятся однопараметрические переменные A(I), то он их нам даст штук 10-12, а затем объявит об overflow (переполнении). Вообще говоря, оператором DIM объявляют массивы (об этом чуть позже) или определяют тип данных для немассивной переменной. Второй оператор REDIM, который можно считать дополнительным видом оператора DIM, заявляет параметры или преобразовывает параметры динамических массивов, снимая предыдущие ограничения. Формат операторов таков:

DIM variable[(subscripts)]

[,variable[(subscripts)] ]...

REDIM variable(subscripts)

[,variable(subscripts) ]...

Дадим некоторые комментарии. Здесь

SHARED указывает на то, что записанные за ним переменные разделяются также и со всеми подпрограммами или процедурами функций в создаваемом и исполняемом модуле.

variable это имя переменной или массива.

subscripts размеры массива, указываемые в формате:

[нижний TO] верхний [,[нижний TO] верхний]...

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

AS type объявляет тип данных массива или переменной (INTEGER, LONG, SINGLE, DOUBLE, STRING, или же указывается тип данных, определяемых самим пользователем).

В операторе DIM объявляют также и характер (статический или динамический) массива. Если способ хранения массива не указывается явно как $STATIC, $DYNAMIC, или COMMON, массивы с цифрами вместо индексов являются статическими, а массивы в DIM с символьными переменными являются динамическими. Оператор REDIM всегда объявляет динамические массивы. Режим статических массивов автоматически заявлен при запуске программы и таким и остается. Хранение динамических массивов происходит в памяти машины во время выполнения программы.

Вернемся к программе, считающей факториал. Добавим в ней такие строки

dim fkt as double

if i<25 then goto 20

print i;“! = ”fkt

Вот теперь для того, чтобы заставить программу «заткнуться» от переполнения, нужно взять весьма большое число, например 171.

Еще одно дополнение. Для экономии памяти машины, часто используют такую возможность, заложенную в QB, как приписывание знака % (процент) к имени числовой переменной для того, чтобы она была заявлена в программе, как целое число. Таким образом, наша последняя программа с учетом такого способа описания целых переменных будет выглядеть так:

dim fkt as double

if i%<25 then goto 20

print i%;“! = ”fkt

Отметим, что циклы весьма важны в написании программ, без них невозможно вводить и считывать массивы данных, вычислять многие функции, вводить списки и т.д. Именно важностью циклов при написании программ можно объяснить тот факт, что почти во всех языках существуют специальные операторы для организации циклов. В QB такой оператор выглядит как

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

Например, константа Pi хранит значение 3,14159265… Число “Пи” не будет изменяться в ходе выполнения программы, но все же хранить такое значение удобнее как константу.

В то же время мы можем использовать переменную sVAT_Rate для хранения ставки НДС на покупаемые товары. Величина переменной sVAT_Rate может изменяться в зависимости от того, что за товар приобретается.

Типы данных

Все переменные и константы относятся к определённому типу данных. В таблице ниже приведены типы данных, используемые в VBA, с описанием и диапазоном возможных значений:

Тип данных	Размер	Описание	Диапазон значений
Byte	1 байт	Положительные целые числа; часто используется для двоичных данных	от 0 до 255
Boolean	2 байта	Может принимать значения либо True, либо False	True или False
Integer	2 байта	Целые числа (нет дробной части)	от -32 768 до +32 767
Long	4 байта	Большие целые числа (нет дробной части)	от -2 147 483 648 до +2 147 483 647
Single	4 байта	Число с плавающей точкой одинарной точности	от -3.4e38 до +3.4e38
Double	8 байт	Число с плавающей точкой двойной точности	от -1.8e308 до +1.8e308
Currency	8 байт	Число с плавающей точкой, с фиксированным количеством десятичных разрядов	от -922 337 203 685 477.5808 до +922 337 203 685 477.5807
Date	8 байт	Дата и время – данные типа Date представлены числом с плавающей точкой. Целая часть этого числа выражает дату, а дробная часть – время	от 1 Января 100 до 31 Декабря 9999
Object	4 байта	Ссылка на объект	Любая ссылка на объект
String	изменяется	Набор символов. Тип String может иметь фиксированную или изменяющуюся длину. Чаще используется с изменяющейся длиной	Фиксированной длины – приблизительно до 65 500 символов. Переменной длины – приблизительно до 2 миллиардов символов
Variant	изменяется	Может содержать дату, число с плавающей точкой или строку символов. Этот тип используют в тех случаях, когда заранее не известно, какой именно тип данных будет введён	Число – Double, строка – String

Очевидно, что пользуясь приведённой выше таблицей и правильно выбирая тип данных, можно использовать память более экономно (например, выбрать тип данных Integer вместо Long или Single вместо Double ). Однако, используя более компактные типы данных, нужно внимательно следить за тем, чтобы в коде не было попыток уместить в них не соразмерно большие значения.

Объявление переменных и констант

Примечание переводчика: Говоря о переменных в VBA, стоит упомянуть ещё один очень важный момент. Если мы объявляем переменную, но не присваиваем ей какое-либо значение, то она инициализируется значением по умолчанию:
текстовые строки – инициализируются пустыми строками;
числа – значением 0;
переменные типа Boolean – False;
даты – 30 декабря 1899.

Прежде чем использовать переменную или константу, её нужно объявить. Для этого в макрос добавляют вот такую простую строку кода:

Dim Имя_Переменной As Тип_Данных

В показанной выше строке кода Имя_Переменной – это имя переменной, которая будет использована в коде, а Тип_Данных – это один из типов данных из таблицы, приведённой чуть ранее в этой статье. Например:

Dim sVAT_Rate As Single Dim i As Integer

Аналогично объявляются константы, но при объявлении констант обязательно сразу указывается их значение. Например, вот так:

Const iMaxCount = 5000 Const iMaxScore = 100

Объявлять переменные в Excel не обязательно. По умолчанию все введённые, но не объявленные переменные в Excel будут иметь тип Variant и смогут принять как числовое, так и текстовое значение.

Таким образом, программист в любой момент сможет использовать новую переменную (даже если она не была объявлена), и Excel будет рассматривать её как переменную типа Variant . Однако, есть несколько причин, почему так поступать не следует:

Использование памяти и скорость вычислений. Если не объявлять переменную с указанием типа данных, то по умолчанию для неё будет установлен тип Variant . Этот тип данных использует больше памяти, чем другие типы данных.Казалось бы, несколько лишних байт на каждую переменную – не так уж много, но на практике в создаваемых программах могут быть тысячи переменных (особенно при работе с массивами). Поэтому излишняя память, используемая переменными типа Variant , по сравнению с переменными типа Integer или Single , может сложится в значительную сумму.К тому же, операции с переменными типа Variant выполняются гораздо медленнее, чем с переменными других типов, соответственно лишняя тысяча переменных типа Variant может значительно замедлить вычисления.
Профилактика опечаток в именах переменных. Если все переменные объявляются, то можно использовать оператор VBA – Option Explicit (о нём расскажем далее), чтобы выявить все не объявленные переменные.Таким образом исключается появление в программе ошибки в результате не верно записанного имени переменной. Например, используя в коде переменную с именем sVAT_Rate , можно допустить опечатку и, присваивая значение этой переменной, записать: “VATRate = 0,175”. Ожидается, что с этого момента, переменная sVAT_Rate должна содержать значение 0,175 – но, конечно же, этого не происходит. Если же включен режим обязательного объявления всех используемых переменных, то компилятор VBA сразу же укажет на ошибку, так как не найдёт переменную VATRate среди объявленных.
Выделение значений, не соответствующих объявленному типу переменной. Если объявить переменную определённого типа и попытаться присвоить ей данные другого типа, то появится ошибка, не исправив которую, можно получить сбой в работе программы.На первый взгляд, это может показаться хорошей причиной, чтобы не объявлять переменные, но на самом деле, чем раньше выяснится, что одна из переменных получила не те данные, которые должна была получить – тем лучше! Иначе, если программа продолжит работу, результаты могут оказаться неверными и неожиданными, а найти причину ошибок будет гораздо сложнее.Возможно также, что макрос будет “успешно” выполнен. В результате ошибка останется незамеченной и работа продолжится с неверными данными!

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

Option Explicit

Оператор Option Explicit заставляет объявлять все переменные, которые будут использованы в коде VBA, и при компиляции выделяет все не объявленные переменные как ошибки (прежде чем будет запущено выполнение кода). Применить этот оператор не сложно – просто запишите в самом верху файла VBA такую строку:

Option Explicit

Если хотите всегда вставлять Option Explicit в начало каждого нового созданного модуля VBA, то это можно делать автоматически. Для этого необходимо включить параметр Require Variable Declaration в настройках редактора VBA.

Это делается так:

В меню редактора Visual Basic нажмите Tools > Options
В появившемся диалоговом окне откройте вкладку Editor
Отметьте галочкой параметр Require Variable Declaration и нажмите ОК

При включенном параметре строка Option Explicit будет автоматически вставляться в начало каждого нового созданного модуля.

Область действия переменных и констант

Каждая объявленная переменная или константа имеет свою ограниченную область действия, то есть ограниченную часть программы, в которой эта переменная существует. Область действия зависит от того, где было сделано объявление переменной или константы. Возьмём, к примеру, переменную sVAT_Rate , которая используется в функции Total_Cost . В следующей таблице рассмотрены два варианта области действия переменной sVAT_Rate , объявленной в двух различных позициях в модуле:

Option Explicit Dim sVAT_Rate As Single Function Total_Cost() As Double ... End Function

Если переменная sVAT_Rate объявлена в самом начале модуля, то областью действия этой переменной будет весь модуль (т.е. переменная sVAT_Rate будет распознаваться всеми процедурами в этом модуле).

Следовательно, если в функции Total_Cost переменной sVAT_Rate будет присвоено некоторое значение, то следующая функция, выполняемая в пределах этого же модуля, будет использовать переменную sVAT_Rate с этим же значением.

Однако, если будет вызвана какая-то функция, расположенная в другом модуле, то для неё переменная sVAT_Rate будет не известна.

Option Explicit Function Total_Cost() As Double Dim sVAT_Rate As Single ... End Function

Если переменная sVAT_Rate объявлена в начале функции Total_Cost , то её область действия будет ограничена только этой функцией (т.е. в пределах функции Total_Cost , можно будет использовать переменную sVAT_Rate , а за её пределами – нет).

При попытке использовать sVAT_Rate в другой процедуре, компилятор VBA сообщит об ошибке, так как эта переменная не была объявлена за пределами функции Total_Cost (при условии, что использован оператор Option Explicit ).

В показанном выше примере переменная объявлена на уровне модуля при помощи ключевого слова Dim . Однако, бывает необходимо, чтобы объявленными переменными можно было пользоваться в других модулях. В таких случаях для объявления переменной вместо ключевого слова Dim нужно использовать ключевое слово Public .

Кстати, для того, чтобы объявить переменную на уровне модуля, вместо ключевого слова Dim можно использовать ключевое слово Private , которое укажет на то, что данная переменная предназначена для использования только в текущем модуле.

Для объявления констант также можно использовать ключевые слова Public и Private , но не вместо ключевого слова Const , а вместе с ним.

В следующих примерах показано использование ключевых слов Public и Private в применении к переменным и к константам.

Объявляет переменную или массив.

Если переменные перечислены через запятую (например, DIM sPar1, sPar2, sPar3 AS STRING), можно определить только переменную Variant. В общем случае, каждая переменная должна быть определена на отдельной строке.

DIM sPar1 AS STRING

DIM sPar2 AS STRING

DIM sPar3 AS STRING

Dim объявляет локальные переменные в процедурах. Для объявления глобальных переменных служат операторы PUBLIC и PRIVATE.

Синтаксис:

Dim Переменная [(Начало To Конец)] [, Переменная2 [(Начало To Конец)] [,...]]

Параметры:

Переменная: произвольное имя переменной или массива.

Начало, Конец: числовые значения или константы, определяющие количество элементов (Количество_элементов=(Начало-Конец)+1) и диапазон индексов.

Начало и Конец могут быть и числовыми выражениями, если ReDim применяется на уровне процедуры.

Тип: ключевое слово, объявляющее тип переменной.

Ключевое слово: тип переменной

Bool: переменная типа Boolean (True, False)

Currency: переменная типа Currency (денежная величина с длиной дробной части в 4 позиции)

Date: переменная типа Date

Double: переменная с плавающей точкой двойной точности (1,79769313486232 x 10E308 - 4,94065645841247 x 10E-324)

Integer: переменная типа Integer (-32768 - 32767)

Long: переменная типа Long Integer (-2 147 483 648 - 2 147 483 647)

Object: переменная типа Object (Примечание: эта переменная может быть определена только впоследствии с помощью оператора Set!)

Single: переменная типа Single (3,402823 x 10E38 - 1,401298 x 10E-45)

String: переменная типа String с максимальной длиной 64 000 символов ASCII.

: переменная типа Variant (охватывает все типы, согласно определению). Если ключевое слово не указано, то переменные автоматически определяются как переменные типа Variant, кроме случаев, когда применяется оператор из диапазона DefBool - DefVar.

В языке Basic Lotus® Symphony™ переменные не требуется явно объявлять. Исключение составляют только массивы. Переменную можно объявить с помощью оператора Dim; если операторов объявления несколько, то они разделяются запятыми. Для объявления типа переменной укажите символ объявления типа после ее имени или введите соответствующее ключевое слово.

В языке Basic Lotus Symphony можно определять одномерные или многомерные массивы, задавая соответствующий тип переменной. Массивы удобны для работы со списками и таблицами. К элементам массива можно обращаться по индексу, который можно задавать посредством числового выражения или переменной.

Массивы объявляются оператором Dim. Диапазон индексов можно определить двумя способами:

DIM text(20) as String REM 21 элемент с номерами от 0 до 20

DIM text(5 to 25) as String REM 21 элемент с номерами от 5 до 25

DIM text(-15 to 5) as String REM 21 элемент (включая 0)

REM с номерами от -15 до 5

Двухмерное поле данных

DIM text(20,2) as String REM 63 элемента с номерами от 0 до 20 уровня 1, от 0 до 20 уровня 2 и от 0 до 20 уровня 3

Типы массивов можно объявлять как динамические, если оператор ReDim определяет количество измерений в процедуре или функции, содержащей массив. В общем случае, размерность массива определяется только один раз и не может быть изменена. В процедуре массив можно объявить с помощью оператора ReDim. Размерности можно определять только с помощью числовых выражений. Это гарантирует соблюдение ограничений на длину полей.

Пример:

Dim sVar As String

Dim iVar As Integer

sVar = "Lotus Symphony "

REM Двумерное поле данных

Dim stext(20,2) as String

Const sDim as String = " Размерность:"

stext(i,ii) = str(i) & sDim & str(ii)