vb 鼠标进入picture1时,picture1.BackColor 为红色,出来后变为蓝色,哪位大哥大姐能帮帮忙,谢谢。

如题所述

第1个回答  2012-09-28
lz的问题如果在C#中就很简单,因为C#的控件本身是有MouseMove和MouseLeave事件的,只需要在MouseMove中设置picture1的backcolor属性为红色,在MouseLeave事件中设置为蓝色即可。

不过,因为vb中的控件并没有类似于以上两个鼠标事件,所以,需要用到API函数,通过API函数捕获鼠标动作,判断鼠标当前位置是否在控件区域内或外。

网上可以找到类似的控件源码,可以参考一下。追问

可以亮一下代码吗?

第2个回答  2012-09-28
vb 中 只有MouseMove 但可以在其他控件中 的MouseMove 加入代码 !结合用一个全局变量
第3个回答  2012-09-28
用picture1 的鼠标事件,很简单的
第4个回答  2012-09-28
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Picture1.BackColor = vbBlue
End Sub
Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Picture1.BackColor = vbRed
End Sub本回答被提问者采纳
相似回答
大家正在搜