如题!
老鸟来 ,菜鸟只准看,不准回答!
如题!
老鸟来 ,菜鸟只准看,不准回答!
用(X / Screen.TwipsPerPixelX)就得到屏幕坐标。如下:
Private Sub Form_Load()
Form1.AutoRedraw = True
End Sub
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Cls
Print "X = " & X / Screen.TwipsPerPixelX
Print "Y = " & Y / Screen.TwipsPerPixelY
End Sub