View: - 149
Private Sub Form_Load() Dim txtBox As TextBox Set txtBox = Controls.Add("VB.TextBox", "txtBox", Form1) With txtBox .Move 150, 240, 1500 .Visible = True End With End Sub