Earlier in the week Seaweed had given me the following code to allow me the ability to use a Mouse Rollover. This was a great function. The problem I am having is that when I run my app, the act of MouseOver causes a quick flicker or flash....This will not be acceptable for the software I am working on. There must be a better way to code a "JAVA like rollover effect", that is efficient, and flicker free?
What say ye?


Seaweed's code:

Option Explicit

Private Sub Form_Load()
Image1.Visible = False
End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Image1.Visible = False
End Sub

Private Sub Label1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Image1.Visible = True
End Sub


Any help will be greatly appreciated,
Daniel Christie