在窗体上,按下鼠标左键拖动,在窗体上显示鼠标指针的坐标位置

在vb中

自己做的,绝对可以用。(拜托给分哦~)
Sub form_mousemove(button As Integer, shift As Integer, x As Single, y As Single)
Text1.Text = x
Text2.Text = y
End Sub
温馨提示:答案为网友推荐,仅供参考
第1个回答  2011-06-17
Dim flag '全局变量

MouseDown 里面写
flag = 1
MouseUp 里面写
flag = 0
mousemove 里面写
If flag Then
Text1.Text = X
Text2.Text = Y
End If
还有字数限制,晕

相关了解……

你可能感兴趣的内容

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网