Question

Visual basic x,y坐标系的问题

Visual basic 考试题
随着鼠标移动可以出现 ，x,y的坐标。点击鼠标左键可以出现字，您点击了鼠标左键。

Answer 1

'如果你不以桌面为参照，则不用api,下面的代码就够了

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label2 = IIf(Button = 1, "你按了鼠标左键", "") '按右键则还原
Label2.AutoSize = True
End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1 = "x轴坐标" & X & " " & vbCrLf & "y轴坐标" & Y
Label1.AutoSize = True
End Sub

Answer 2

你要出现字，我想不如简单些用个label即可lable1

事件

mousemove中的xy就是你要的，lable1.caption = x & "," & y
mousedown中的button是不是为1是左键,if button =1 then lable1="你按下左键了" else label1=""

Answer 3

好像也要用数学转换吧
说说具体要求