首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

请教vb里有x和y轴吗如果有如何表示如果没有为什么没有请说细些多谢

2012-03-27 
请问vb里有x和y轴吗如果有怎么表示如果没有为什么没有请说细些谢谢!请问vb里有x和y轴吗如果有怎么表示如果

请问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驱动

热点排行