Создание МАССИВА для программы

[rekri]

Первоначальное условие: реализовать операцию деления целых чисел n и m с помощью сложения. Программу я сделала, но к ней нужно создать массив, с которым я не справляюсь, помогите пожалуйста.

Private Sub CommandButton1_Click()
Dim m, n, i As Single 
m = Val(TextBox1.Text) 
n = Val(TextBox2.Text) 
n = -n
i = 0
Do While m > 0 
m = m + n
i = i + 1
Loop 
TextBox3.Text = i
End Sub

Ааа, правда никто не может помочь ? Даже аспиранты в универе не могут создать на это задание массив.(((

[vefer]

Создать массив чего?

[rekri]

Сообщение от vefer

Создать массив чего?

Массив значения m

[vefer]

Задача то как звучит? И куда этот массив надо вывести? Если просто в ячейки значения, то не надо никакого массива создавать. А если все таки надо массив, то тут нужен динамический, создается оператором ReDim.