ما الخطا في هذا الكود :
Private Sub Image1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) Call Form_MouseMove End Sub
او
Private Sub Image1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) Call Form1_MouseMove End Sub

