Code:
If Text1.Enabled = True Then
     Text1.ToolTipText = "Enabled!"
Else
     Text1.ToolTipText = "Disabled!"
End If
Did you mean it that way?