Dim TestArray (0 To 10) As Integer



В данном примере объявляется одномерный массив целых чисел с именем TestArray. Граница изменения индексов массива задается в диапазоне от 0 до 10. Для установки элементам данного массива конкретных значений можно исполь­зовать цикл For...Next

For I = 0 to 10

TestArray (i) = I + 1

Next I

Здесь элементам массива TestArray присваиваются значения одиннадцати целых чисел: 1, 2…11.

Иногда в процессе выполнения программы требуется изменять размер мас­сива. В этом случае первоначально массив объявляют как динамический. Для этого при объявлении массива не надо указывать его размерность, например:

Dim R ( ) As Single

 

Затем в программе следует вычислить необходимое количество элементов массива и сохранить его в некоторой переменной, например n, а затем изменить размер динамического массива с помощью оператора ReDim. Например:

ReDim R( l To 3)

Синтаксис оператора :

ReDim [ Preserve]   Имя_массива (размерность) [ As type]

Preserve — ключевое слово, используемое для сохранения данных в су­ществующем массиве при изменении значения последней размерности. Если ключевое слово Preserve не используется, то данные в массиве при изменении размерности не сохраняются;

Имя_массива — имя массива, удовлетворяющее стандартным правилам имено­вания переменных;

размерность — размерности массива; допускается описание до 60 размер­ностей.

type — тип данных массива.

Допустимо повторное использование оператора ReDim для изменения числа элементов и размерностей массива.

 

Ход работы:

1. Создать программу на языке VBA, согласно варианту выбранному из таблицы.

Вариант 1 2 3 4 5 6 7 8 9 10
Функции 1,3,5 2,4,6 3,5,7 4,6,8 5,7,9 6,8,1 7,9,2 8,1,3 9,2,4 1,3,6

2. Сохранить книгу на диске под именем Lab_rab_5

 

 

ЗАДАНИЯ

для выполнения лабораторной работы

 

1. Заданы натуральное число n и последовательность вещественных чисел b1, b2, …,bn. Сформировать одномерный массив А такой, что a1 =1/(bi-bi-1), i=2,3,…,n. a1=1/( b1- bn). Значение n и последовательность чисел b1, b2, …,bn задать в виде констант.

2. Заданы натуральное число n и последовательность вещественных чисел a1, a2, …, an. Рассчитать среднее арифметическое по формуле  и выборочную дисперсию по формуле .

3. Задан двумерный массив B размерности 3*5. Получить новый массив с именем V путем удаления из B строки и столбца, в которых содержится минимальный элемент. Массив B определить как константу.

4. Задан двумерный массив А размерности m*n. Дополнить его (m+1)-й строкой и (n+1)-м столбцом, в которых записать суммы элементов соответствующих строк и столбцов исходного массива А. В элементе аm+1,n+1 должна храниться сумма элементов первоначального массива. Все исходные данные записать в виде констант.

5. Заданы два одномерных массива А и В размерности соответственно n и m. Сформировать двухмерный массив D размерности m*n каждый элемент которого dij= ai*bj ; i=1,2,…, n; j=1,2,…, m и обнулить отрицательные элементы D.

6. Задана целочисленная квадратная матрица порядка 4. Из этой матрицы выбрать столбец, который обладает наибольшей суммой модулей элементов. Если таких столбцов несколько, то выбрать первый из них. Далее в данном столбце найти наименьшее из значений его элементов.

7. Задана вещественная матрица размерности m*n , все элементы которой различны. В каждой строке выбрать элемент с наименьшим значением, затем среди этих чисел выбрать наибольшее. Указать индексы элемента с найденным значением.

8. Заданы целые положительные числа m, n и p. Определить вектор x=(x1, x2, …, xm), элементы которого

исходные данные n=3, m=4, p=46.

9. Заданы матрицы А размерности m*n и В размерности n*l. Определить матрицу С размерности m*l, равную произведению матриц А и В, т.е.   для i=1,2…m; j=1,…l. Исходные данные: m=2, n=2, l=-3.

 

Лабораторная работа № 6

«Программирование функций обработки строк на языке VBA»

Цель: Изучить основные методы работы со строковыми элементами на языке VBA.

 


Дата добавления: 2019-09-13; просмотров: 227; Мы поможем в написании вашей работы!

Поделиться с друзьями:






Мы поможем в написании ваших работ!