vb6 keydown event

[duponty]

Hi there,

I have this code


Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

Select Case KeyCode

Case vbKeyRight
Shape1.Left = Shape1.Left + 100

End Select

End Sub




which works perfectaly...

But when I change the shape for an anigif (anigif.ocx) it is not working at all...

any clues?

thanks
Yannick

 

[Hypetia]

Set the KeyPreview property of the form to True and try again.