The default of the text being enabled is gray
Gray? Do you mean change the disabled text? (rather than enabled text). If so, use the following code.
Code:
Private Declare Function SetSysColors Lib "user32" (ByVal nChanges As Long, lpSysColor As Long, lpColorValues As Long) As Long
Private Declare Function GetSysColor Lib "user32" (ByVal nIndex As Long) As Long
Const COLOR_GRAYTEXT = 17
Dim lForeColor
Private Sub Form_Load()
'Get the current colour of the Grayed text
lForeColor = GetSysColor(COLOR_GRAYTEXT)
'Change it to blue
SetSysColors 1, COLOR_GRAYTEXT, vbBlue
End Sub
Private Sub Form_Unload(Cancel As Integer)
'When the Form unloads, change the colours back to the original colours
SetSysColors 1, COLOR_GRAYTEXT, lForeColor
End Sub
When you load the Form, it will change the Disabled colour to blue and when you unload the Form it will change them back to the original settings.