dynamic controls

I would like to make a new textBox at runtime and put it on the form in a specific location.

any ideas ?

Thank you

[code]
Option Explicit

Private WithEvents btnObj As TextBox

Private Sub Form_Load()
Set btnObj = Controls.Add("VB.textbox", "btnObj")
With btnObj
.Visible = True
.Width = 2000
.Text = "Hello"
.Top = 1000
.Left = 1000
End With
End Sub
[code]

thnkxs :-)