Привет всем! Товарищчи помогите, для теста создал форму с Image1 с рисункой карты города и с тремя Lable, надо чтоб после запуски формы когда маус передвигаем по карте в Lable-х 2 и 3 отображались коордынаты X, Y.
Когда открываю форму UserForm1.Show выскакивает ошибка - " Procedure declaration does not match description of event or procedure heving the same name" (Процедуру я взял с инета http://vbzero.narod.ru/chapter1/page_14.htm#sMouseDown
- там она для VB и для Picture)

внизу даю код Процедуры

Public Sub Image1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

Label1.Caption = "Мыш работает с PictureBox"

Label2.Caption = "Коордыната x= " & X
Label3.Caption = "Коордыната y= " & Y

End Sub
--------------------------------
Private Sub Label1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)

End Sub
-------------------------------
Private Sub Label2_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)

End Sub
-------------------------------
Private Sub Label3_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)

End Sub

Спасибо Димит! я тоже так сделал и всё ОК! и ещё один вопрос - карта расчерена на раионы, надо как определить по координатам находится ли курсор в опред. квадрат чтобы кликнув в image загружалась карта соответствющего раиона?

Всё ОК! спасибо тем кто помог советом и кто просмотрел