Программирование. Валерий Федорович Альмухаметов
Mass1!(1 To 40)
Dim Mass2(1 To 30) As Double
ИНДЕКСЫ массива – целые выражения, принимающие положительные значения. Минимальное значение равно 0.
Массив с двумя индексами: Dim Ocenka(1 To 5, 1 To 20) As Integer
Удалить из памяти массивы можно оператором Erase с указанием через запятую списка имен массивов.
Для включения возможности изменения размеров массива их объявляют оператором ReDim и в диапазоне индексов можно указать имена переменных, значения которых, например, при решении ввести через текстовые поля. Чтобы при переопределении массива старые значения не были потеряны можно использовать оператор описания в виде: ReDim Preserve .
В случае, если обозначение типа данного отсутствует, то идентификатору присваивается тип Variant – произвольный. Основные обозначения: % -целые (Integer), например: Atip%, от -32768 до 32767, ! -вещественные (Single) от 1.41Е-45 до 3.4Е-38, # -двойной точности (Double) от 4.95Е-324 до 1.79Е-308, $ -символьные (String), обрамляются кавычками.
Для определения переменных используется оператор ПРИСВАИВАНИЯ:
V=A(4)
Itog_sceta=Itog_sceta+Ocenka(I,J)
C= А(6)+В
Ввод вывод данных
Для ввода данных может использоваться элемент текстовое поле (TextBox). Он может быть установлен на экранную форму. Оператор присваивания позволяет считать данные введенные с клавиатуры: A=Dlina.Text , где Dlina это имя поля (Name).
Считывание: В=InputBox("Комментарий","Заголовок окна","Начальное значение") позволяет вводить данные с помощью специального "окна ввода".
Данные можно выбрать из заранее подготовленного или заполняемого при решении задачи "окна списка". Например: Х=ИмяОкнаСписка.List(N).
Для ввода из файла используется оператор ОТКРЫТИЯ ФАЙЛА: OPEN.
Open "A1.TXT" For Input As #K
Открывается файл с именем A1 и расширением TXT, номер его К, затем из файла вводятся данные с помощью оператора Input #K,R переменная R. Оператор Line Input используется для ввода данных из файла построчно.
Оператор ЗАКРЫТИЯ файла: CLOSE #K закрывает открытый #К файл. Для вывода в файл используется оператор с записью ( For Output ) и затем (Print #K, … или Write #K, …).
Вывод на форму осуществляется оператором ВЫВОДА: PRINT со списком выводимых переменных.
Для слитного вывода в ряд числовых значений с комментарием используется разделение точкой с запятой между переменными.
Print “РЕЗУЛЬТАТ А и В =”,A;B
для раздельного вывода по столбцам, запятая:
Print C,D
Оператор PRINT без списка данных выполняет перевод строки.
Функция TAB производит форматирование вывода.
Print Tab(5),X
Перед выводом числа Х будет пропущено 5 пробелов. Функция TAB часто используется для построения графиков или таблиц.
Результат может быть показан в установленном "текстовом поле", например: ИмяПоля.Text=Y.
Нестандартные функции и процедуры
Одно из проявлений модульного принципа построения программ это использование собственных функций и процедур.
Повторяющиеся в программе арифметические выражения, можно представить в виде оператора функции и соответствующей процедуры.
Для описания функции используется например описание:
Public Function AA(A As Single,B As Single,C As Single) As Double
P=(A+B+C)/2
AA=Int(Sqr(P*A*B*C)
End