82
16.2. Лабораторна робота №6
Тема: «Обробка одномірних масивів»
Приклад. Дано масив X(N). Сформувати масив Y(N) по формулі
N
y(i) = x2 (i). Знайти S = å y(i).
i =1
Для вводу даних і запису результатів використовувати аркуш Excel.
1 |
A |
B |
C |
D |
E |
F |
Кількість елементів |
|
|
6 |
|
|
|
2 |
Масив Х |
|
|
|
|
|
3 |
2 |
3 |
5 |
-4 |
2 |
6 |
4 |
Масив Y |
|
|
|
|
|
5 |
4 |
9 |
25 |
16 |
4 |
36 |
6 |
Сума |
|
|
94 |
|
|
Private Sub Lab_6()
Dim X(10) As Single, Y(10) As Single
N=Cells(1,4): S=0
For i=1 to N x(i)=Cells(3,i) y(i)=x(i)^2 S=S+y(i) Cells(5,i)=y(i)
Next I
Cells(6,4)=S
End Sub
16.3. Лабораторна робота №7
Тема: «Обробка одномірних масивів з перестановкою елементів»
Приклад. Записати елементи масиву X(N) у масив Y(N) у зворотному по-
рядку й обчислити
83
N
P= Õ y(i)
i=1
1
2
3
4
5
6
A |
B |
C |
D |
E |
F |
Кількість елементів |
|
|
6 |
|
|
Масив Х |
|
|
|
|
|
2 |
3 |
5 |
-4 |
2 |
6 |
Масив Y |
|
|
|
|
|
6 |
2 |
-4 |
5 |
3 |
2 |
Добуток |
|
|
-1440 |
|
|
Private Sub Lab_7 ()
Dim X(10) As Single, Y(10) As Single
N=Cells(1,4)
P=1
For i=1 to N x(i)=Cells(3,i)
Next i
For i=1 to N y(i)=x(N-i+1): P=P*y(i) Cells(5,i)=y(i)
Next i
Cells(6,4)=P
End Sub
16.4. Лабораторна робота №8
Тема: «Обробка двовимірних масивів»
При виконанні лабораторних робіт №6, №7 №8 створити модуль.
Для цього виконати команду: Вставка – Модуль.
84
16.5. Створення форм. Властивості, події й методи форм.
Форма – це головний об'єкт, що утворить візуальну основу додатка. По своїй суті форма являє собою вікно, у якому можна розміщати різні керуючі елементи при створенні додатків. Для створення форм необхідно виконати ко-
манду: Вставка – UserForm.
У вікні Конструктора форм з'яв-
иться форма, що має стандартний ви-
гляд для OC Windows.
Як і будь-який інший об'єкт
VBA форма має набір властивостей
(табл. 16.1). Для одержання довідки по будь-якій властивості досить виділити її у вікні властивостей і натиснути F1.
Таблиця 16.1
|
Основні властивості форм. |
|
|
Властивість |
Опис |
|
|
BackColor |
Кольори фона для форми. |
|
|
BorderStyle |
Визначає тип границі, що оточує форму. |
|
|
Caption |
Текст, що виводиться в заголовку форми. |
|
|
Font |
Визначає тип і вигляд шрифту у формі. |
|
|
Height |
Визначає висоту форми у твіпах. |
|
|
(Name) |
Ім'я об'єкта, для програми VBA. |
|
|
Width |
Визначає ширину форми у твіпах. |
|
|
Властивості можна змінювати в режимі конструювання у вікні властивос-
тей, або програмно в режимі виконання. Наприклад, у ході виконання програми можна змінити заголовок форми командою:
frmForm1.Captiton=”Привіт”
Програми в OC Windows управляються подіями (табл. 16.2). Щораз, коли натискається кнопка, переміщається миша, змінюються розміри форми й тобто,