Creating Controls at Run-time

[Thomas Halsvik]

This should work:

Dim Kontroll As Control
Dim ActiveForm As Object
Set ActiveForm = Form1
Set Kontroll = ActiveForm.Controls.Add("Forms.TextBox.1", "SomeNameOnTheControl)
Kontroll.left = 10
Kontroll.top = 10
Kontroll.width = 100
Kontroll.height = 16
Kontroll.Text = "SomeText"

etc...

Done this is VBA for Office 97 which is somewhere between VB 4 and VB 5.