【求助】【非伸手】关于鼠标问题

问一：我的MouseIcon.Height和MouseIcon.Width无效，是怎么一回事？用的是VB精简版。
问二：我想做一个东西，鼠标点击按钮后出一个image框用timer.i=1跟随，
①使用Form_MouseMove时因为鼠标在image框上导致image不是“实时”跟随鼠标（因为鼠标在image上的时候不触发Form_MouseMove）请问怎么解决？
②使用Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long时读取的是鼠标在屏幕上的坐标，怎么转换到form上的坐标？
求个解决思路，能给出关键代码的话不胜感激，拜托各位大佬了

定义可能理解上出错了。

一，必须先设置MouseIcon属性为一个图标，它的Width和Height属性才是有效的
二，（1）在Image_MouseMove事件中令Image.Visible=False即可
（2）横坐标减去Me.ScaleX(Me.Left,1,3)、纵坐标减去Me.ScaleY(Me.Top,1,3)即可（直接使用Left和Top属性返回的数值单位是Twip，需要这样换算成像素）

我的看法是
一，这个我不知道。
二，1、解决方法有好几种。①image的左上角不要正对鼠标位置，稍微向右下错开一点，问题就不会出现了。②image的MouseMove事件有x、y，加上左上角的坐标就是鼠标在窗体的坐标，可以用来设定新的image位置。等等类似的方法都可以用。
2、你可以直接用窗体的MouseMove取得坐标啊

扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频！

11回复贴，共1页

<<返回vb吧

分享到:

日	一	二	三	四	五	六