你捕获鼠标的坐标就可以了啊。再根据坐标来画边框就是了。你不是已经能画边框和擦除边框了吗。应该很简单啊。
设置一个timer，时间间隔任意，启动timer之后，取鼠标X,Y坐标，然后把此参数传递给Rectangle。
取坐标和Rectangle 函数都放在timer函数里。
设置一个timer，时间间隔任意，启动timer之后，取鼠标X,Y坐标，然后把此参数传递给Rectangle。
这个你可能需要一个全局鼠标hook
VB6的话需要把鼠标hook写到dll里, 在主程序调用dll实现全局鼠标跟踪
然后在 hook里处理鼠标移动事件, 调用你的屏幕画框函数
vb6 做hook很危险, 一个不留心就会使ide挂掉, good luck
鬼给你做啊,VB做不到
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024