with the code above, when i change the picture1(red color) to image 1(because i need to use image). it came out an compile error:Method or data member not found. how to solve this problem?Code:Private Sub Form_Load() Me.Font.Bold = True With Picture1 .AutoRedraw = True .ScaleLeft = 101.46667 .ScaleWidth = 99.7 - 101.46667 .ScaleTop = 2.85667 .ScaleHeight = 4.0166694 - 2.85667 End With End Sub Private Sub picture1_mousemove(Button As Integer, Shift As Integer, X As Single, Y As Single) Label1.Caption = X Label2.Caption = Y End Sub




Reply With Quote