Barra de Ferramentas

[AndersonDutra 4]

Queria fazer uma Barra de Ferramentas igual do IExplore, que ela esteja preto e branco e ao passar o mouse por cima ela ganhe cor, alguem sabe como fazer.

[luiz humberto 0]

Para fazer isso, utlize o evento MouseMove do objeto.

Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)MsgBox testeEnd Sub

Toda vez que o mouse passar em cima da botão ele exibirá a mensagem.