Static X(2) As Integer

Массивы.

StaticMy Name as string

Замечание: в операторе объявления ключевое слово Dim заменяется на Static.

Static идентификатор As тип

Option Explicit

Dim имя_переменной As тип_переменной

Объявление переменных

По результатам работы делают вывод.

Как правило, все современные языки программирования требуют, чтобы переменные были объявлены перед тем, как они появятся первый раз в каком - либо выражении. При объявлении пользователь должен явно объявить тип и имя переменной. Для этих целей в Visual basic используется оператор Dim.

Например

Dim Alfa As Integer, Beta As Long, Gamma, Delta As Date

Dim Str As String

Если вы хотите, чтобы объявление переменных было обязательным, то проделайте следующее:

· Через меню Инструменты (Tool )► Опции ( Option) выберите вкладку Редактор ( Editor ) и установите опцию Требовать объявление переменных (Require Variable Declaration);

· Если вы хотите сделать обязательным явное объявление переменных в пределах одного модуля, то в секцию объявлений модуля следует поместить следующую строку

Заметим, что переменная, объявляемая в процедуре, инициализируется каждый раз, когда происходит вызов этой процедуры. Однако, если необходимо, чтобы переменная сохраняла свое старое значение при повторном обращении к процедуре, при ее описании надо использовать ключевое слово Static ( статическая ):

Например:

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

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

Dim Имя массива (границы) [ As тип]

:

В следующем примере объявляется массив целого типа, а затем его элементам присваивается значения X(0) = 7; X(1) = 99; X(2) = 627

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

По умолчанию первый элемент массива имеет индекс равный 0. Число, указанное в скобках – верхняя граница массива, которая на единицу меньше числа элементов массива.

Массивы бывают одномерные и многомерные. Простейшие массивы имеют только одну размерность (индекс). В массивах с размерностью больше единицы относятся к категории многомерных массивов.

Например: MyList(10) – одномерный массив; ER(3,5) – двумерный массив.

Чтобы созданный массив был доступен на уровне модуля, объявите его ключевым словом Dim в секции (General)(Declarations) модуля. Если же массив должен быть доступен на уровне приложения, объявите его ключевым словом Public.

Упражнение 1. Какработать с массивами.

1. Создайте новый проект. Присвойте ему имя «Переменыые_Массивы_Процедуры»

2. Форме присвойте имя FrmAr и заголовок Caption = Переменные и массивы.

3. Введите в проект новый модуль, – щелкните правой кнопкой мыши в окне проект и выберите команду Add►Module из контекстного меню.

4. В диалоговом окне Add Module выберите значок Module.

5. В окно программного модуля Module1 введите следующую процедуру:

Sub Main()

Dim x(7) as Integer

Dim I as Integer

Dim txt as string

‘Заполните массив

For i=o to 7

X(i) = 2^i

Next i

Вывести массив

FrmAr.Show

For I = 0 To 7

Txt = "Элемент массива " + Str$(I) + " ="

Txt = Txt + Str$(x(I))

FrmAr.Print Txt

Debug.Print Txt

Next i

End Sub

Запустите программу. И проследите за окном отладки и формой. В первой части фрагмента объявляются переменные. Массив x(i) должен содержать 8 элементов. Переменная I используется в циклах For ….Next, а в строке txt выполняется формирование результата.

Первый цикл заполняет массив, где в соответствии с формулой x(i) = 2^I каждому элементу массива присваивается очередная степень двойки.

Последний цикл формирует переменную txt, а команды Debug.Print и FrmAr.Print выводят ее в окне отладки и на форму (рис 1)

.

Дата добавления: 2015-05-10