• Home
 · 
• Custom Controls/Forms/Menus
 · 
• Change Font Color On Form

Change Font Color On Form

This code will change the forecolor for Labels and Textboxes (can be edited for Other Controls).

Rate Change Font Color On Form

• 1
• 2
• 3
• 4
• 5

(4(4 Vote))

Sub ChangeFont(frm As Form, color As String)
On Error GoTo errhand
Dim Control
For Each Control In frm.Controls
If TypeOf Control Is Label Then Control.ForeColor = color
If TypeOf Control Is TextBox Then Control.ForeColor = color
Next Control
Exit Sub
errhand:
MsgBox "Error Changing Font Color!", vbCritical
End Sub