shakti5385 was close - just the wrong control

use a checkbox. Set it's style to Graphical and then you have control over forecolor. Just remember to have something like this in the click event:
VB Code:
  1. Private Sub Check1_Click()
  2.     If Check1.Value = vbChecked Then
  3.         Check1.Value = vbUnchecked
  4.        
  5.         ' Code for 'Button' Click event
  6.    
  7.     End If
  8. End Sub