Как создать объект на форме?

[tns-ka]

Всем здравствуйте!
Проблема такая:
Допустим, есть некоторая форма, на которой расположено несколько текстовых полей, и есть кнопка, при нажатии на которую на форме должно добавляться еще одно текстовое поле (потом опять нажал - опять добавилось, еще нажал - еще добавилось и т.д.). Какой код должна содержать кнопка?

[The_Prist]

Код будет примерно такой

Private Sub CommandButton2_Click()
    Dim sName As String: sName = "NewBox" & 1
    With UserForm1.Controls.Add(bstrProgID:="Forms.textBox.1", Name:=sName, Visible:=True)
        .Top = 40
        .Left = 20
    End With
End Sub

sName, Top и Left задайте свои. Отталкиваться при задании данных параметров думаю стоит от параметров последнего созданного контрола.
И еще: помните, что данные контролы будут созданы только на время отображения формы. После её выгрузки из памяти все контролы, созданные программно, будут удалены.

[tns-ka]

Спасибо огромное! Очень выручили!!!