Программирование. Валерий Федорович Альмухаметов

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