[求助]如何让鼠标在Form1切换到Form2后,再关闭Form2,就算鼠标位置改变,也不触发Form1的鼠标移动事件?
[求助]如何让鼠标在Form1切换到Form2后,再关闭Form2,就算鼠标位置改变,也不触发Form1的鼠标移动事件?
Form1切换到Form2后,原来在Form1的鼠标位置改变了,当Form1重新获得鼠标的时候,就会立刻触发鼠标移动事件了,但是我不希望这样,应该如何处理?
测试的时候:
1.在Form1,用Esc键显示Form2.或用按钮显示Form2.或用鼠标移动一个较大的距离显示Form2.
2.在Form2用鼠标点按钮(相当于移动一个较大的距离后,关闭Form2).
3.就会发现问题,Form2会再打开一次,要再点一次Form2的按钮,才把Form2关闭.
程序文件地址:
http://66056.24286.84g.com/veny/vs/发鼠标移动事件问题.rar
[解决办法]
在Form2用鼠标点按钮时把鼠标的x,y值赋给FORM1
[解决办法]
本帖最后由 bcrun 于 2013-04-04 19:05:09 编辑 将Static prevX As Integer，Static prevY As Integer改为Public prevX As Integer，Public prevY As Integer放在模块中，在form2中的QueryUnload或者Unload事件加上
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
prevX = 0
prevY = 0
End Sub
Private Sub Command1_Click()
Form1.prevX = 0
Form1.prevY = 0
Unload Me
End Sub
