读书人

请教vb里有x和y轴吗如果有如何表示如果

发布时间: 2012-03-27 13:44:24 作者: rapoo

请问vb里有x和y轴吗如果有怎么表示如果没有为什么没有请说细些谢谢!
请问vb里有x和y轴吗如果有怎么表示如果没有为什么没有请说细些谢谢!
如果可以请加我的QQ:382245409谢谢!

[解决办法]
有的
左上角为(0,0), 向下向右分别为y,x轴
你可以加以下代码,然后移动鼠标察看

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Debug.Print X & ": " & Y
End Sub
[解决办法]
Private Declare Function GetCursorPos Lib "user32.dll " (ByRef lpPoint As POINTAPI) As Long
Private Declare Function ScreenToClient Lib "user32.dll " (ByVal hwnd As Long, ByRef lpPoint As POINTAPI) As Long

用这两个函数即可转换Mouse位置.用Timer驱动

读书人网 >VB

热点推荐