DaniWeb Forum Index > Software Development > Visual Basic 4 / 5 / 6

Visual Basic 4 / 5 / 6 RSS

adding objects at runtime

•

Join Date: Jan 2008

Posts: 16

Reputation: K-Dave is an unknown quantity at this point

Solved Threads: 1

K-Dave

Offline

Newbie Poster

adding objects at runtime

May 30th, 2008

How can i add objects such as buttons, labels or textboxes at runtime?

•

Join Date: Feb 2008

Posts: 509

Reputation: selvaganapathy is an unknown quantity at this point

Solved Threads: 88

selvaganapathy selvaganapathy is offline

Offline

Posting Pro

Re: adding objects at runtime

May 30th, 2008

Hi
Example to adding control at runtime

 Help with Code Tags 
 VB Syntax (Toggle Plain Text) 
Option Explicit
' Declare object variable as CommandButton.
Private WithEvents cmdObject As CommandButton 
 
Private Sub Form_Load()
   Set cmdObject = Form1.Controls.Add("VB.CommandButton", "cmdOne")
   cmdObject.Visible = True
   cmdObject.Caption = "Dynamic CommandButton"
End Sub
 
Private Sub cmdObject_Click()
    MsgBox "This is a dynamically added control"
End Sub
Option Explicit
' Declare object variable as CommandButton.
Private WithEvents cmdObject As CommandButton 

Private Sub Form_Load()
   Set cmdObject = Form1.Controls.Add("VB.CommandButton", "cmdOne")
   cmdObject.Visible = True
   cmdObject.Caption = "Dynamic CommandButton"
End Sub

Private Sub cmdObject_Click()
    MsgBox "This is a dynamically added control"
End Sub