Page 129 - 4192

For i = 1 To n
A(i) = (Rnd + i) * (-1) ^ i
Next i
End Sub
3. За допомогою оператора Array
Option Base 1
Private Sub Command1_Click()
A = Array(3, -1, 2, 6, -12, 6, 4, -33, 12, 1)
End Sub

2 ВИВЕДЕННЯ ЕЛЕМЕНТІВ МАСИВУ

Виведення елементів масиву здійснюється оператором
виведення Print.
Елементи можна виводити на форму або у вікно
PictureBox у вигляді рядка або стовпчика.

Рисунок 8.4 – Блок-схема виведення масиву

а) у стовпчик на б) у рядок у вікно

форму (рис. 8.5) PictureBox (рис.8.6)

For i = 1 To n For i = 1 To n
Pri nt D(i) Picture1.Print D(i); " ";
Next i Next i

128