Sub SomeProcedure(ColInt As Integer) Dim txt(ColInt) As VB.TextBox For i = 1 To ColInt

Формулировка задачи:

Sub SomeProcedure(ColInt As Integer)
 Dim txt(ColInt) As VB.TextBox
 For i = 1 To ColInt
  Set lbl(i)=Controls.Add('vb.textbox', 'lbl'& i)
  txt(i).Visible = True
  txt(i).Height = 200
  txt(i).Top = 300 * i
 Next i
End Sub

Почему работает - непонятно если я задаю lbl(i) то зачем мне писать в параметрах имя??? которое к тому же них не значит (после кода пытался обратиться к пресловутым lbl1 итп - хрен - нету их. но работает (массив текстбоксов lbl(i) i = 1..20 Разработчики слажали или я чего не догоняю?

Решение задачи: «Sub SomeProcedure(ColInt As Integer) Dim txt(ColInt) As VB.TextBox For i = 1 To ColInt»

textual
                            Листинг программы 
                        
                            Unload Text1(INDEX)