All you need to do is make a command button, and in this case name it "cmdDude" with whatever caption you want. (i made my caption "dude"). When the mouse moves over the command button, its font becomes bold. When it moves back over the form, it goes back to normal. If the mouse moves over another control before it moves over the form, however, it will remain bold until the mouse touches the form.

Private Sub cmdDude_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) cmdDude.FontBold = True End Sub Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) cmdDude.FontBold = False End Sub