در زمان اجرا یک کلید به برنامه اضافه کنید.

Private Sub Command1_Click

Form1.Controls.Add "VB.CommandButton", "txtText", Form1
With Form1!txtText
          Visible = True
  Top = 100
   Left = 100
Width = 4000
    Height = 500
    Font.Size = 18
   "Caption = "Command1

End With

End Sub

لطفا قبل از خصوصیتها علامت نقطه قرار دهید.