sağolun hocam teşekkür ederim zaten yeteri kadar yardımda bulundunuz bu sizin yaptığınız butonları yapıyorumda
Private Sub Resim2_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.Resim2.Visible = False
End Sub
yukarıda fare taşındığında olayına yazılıyor.
aşağıdakininde olması lazım bu nerden yazılıyor
Private Sub Ayrıntı_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.Resim2.Visible = True
End Sub