CodeItBetter Programming Another VB Programming Blog

'Controls - How to create Controls in a form runtime (without creating in design time)
Option Explicit
 
Dim WithEvents cmdTest As VB.CommandButton
 
Private Sub Form_Load()
    Set cmdTest = Controls.Add("VB.CommandButton", "cmdTest", Me)
    cmdTest.Move 100, 100
    cmdTest.Caption = "Hello"
    cmdTest.visible = True
End Sub
 
Private Sub cmdTest_Click()
    MsgBox "Hi There!"
End Sub