• Home
 · 
• Graphics
 · 
• When you create Wizard based application then you have to need create control at run time without u

When you create Wizard based application then you have to need create control at run time without u

When you create Wizard based application then you have to need create control at run time without using Control Array..

API Declarations


Private WithEvents CmdObject As CommandButton



Rate When you create Wizard based application then you have to need create control at run time without u

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Private Sub CmdObject_Click()
    MsgBox "Click Event is Call"
End Sub
Private Sub Form_Load()
    Form1.Controls.Add "vb.label", "cmdfirst", Form1
    With Form1!cmdfirst
        .Visible = True
        .Left = Form1.Left + 100
        .Top = Form1.Top + 100
        .AutoSize = True
        .Caption = "Enter Caption"
    End With

    Set CmdObject = Form1.Controls.Add("vb.commandbutton", "cmdValue", Form1)
    With CmdObject
        .Visible = True
        .Left = Form1!cmdfirst.Left + Form1!cmdfirst.Width + 100
        .Top = Form1.Top + 100
        .Height = 500
        .Caption = "Dynamic Button"
    End With
   

End Sub
Private Sub cmdValue_Click()
        MsgBox "Click event is call"
End Sub