• Home
 · 
• String Manipulation
 · 
• Clear/Change caption on all labels/command buttons, text on all textboxes or simply doing an event

Clear/Change caption on all labels/command buttons, text on all textboxes or simply doing an event

Clear/Change caption on all labels/command buttons, text on all textboxes or simply doing an event on all controls in form in just one

API Declarations


'or snail mail
'Ericson Liwanag
'AMA Computer Learning Center
'Pagdaraoan, San Fernando City
'La Union 2500
'Philippines



Rate Clear/Change caption on all labels/command buttons, text on all textboxes or simply doing an event

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

Private Sub Command1_Click()
    For Each controlx in Form1.Controls
    'Clearing all text in Textbox in the said Form
    If TypeOf controlx is Textbox Then controlx.Text = ""
    'Clearing all caption in Labels in the said Form
    If TypeOf controlx is Label Then controlx.Caption = ""
    'Changing Caption of all Command Buttons in the said Form
    If TypeOf controlx if CommandButtons Then controlx.Caption = "Click"
    Next controlx
End Sub