Forms VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Forms
  4. Adding Controls to a UserForm at Design Time
Sub RunTimeButton()
    Dim Butn As CommandButton
    Set Butn = UserForm1.Controls.Add("Forms.CommandButton.1")
    With Butn
        .Caption = "Added at runtime"
        .Width = 100
        .Top = 10
    End With
    UserForm1.Show
End Sub