mouseover??

[crptcblade]

How do i recreate Javascript's 'mouseover' event, for example, if i move the mouse over a command button, i want the status bar to display a certain text, and when the mouse moves off the button, the staus bar text clears, how do i do that??

[crptcblade]

please help??

[dimava]

here you go

'assuming that the button is Command1 and the label is Label1 and the form is form1
Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.Caption = "You have your cursor on the button"
End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.Caption = ""
End Sub