请问VB中picture中的mousemove属性?
PrivateSubPicture2_MouseMove(ButtonAsInteger,ShiftAsInteger,xAsSingle,yAsSingle)中的X,Y...
Private Sub Picture2_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)中的X,Y分别表示什么?
展开
2个回答
展开全部
首先MouseMove属性不是属性而是事件,当鼠标在picture2上面移动时触发MouseMove事件。
其中几个参数的解释:
button:鼠标滑动时如果按住左键则返回1,如果是按右键则返回2,没有按任何按键则返回0。
shift:鼠标滑动同时如果同时按住了键盘的Shift键则返回1,如果没按则返回0 。
X和Y:是鼠标滑动时鼠标位置相对于picture控件左上角的坐标,X为横向坐标,Y为纵向坐标,也就是根据XY值能确定鼠标指针在picture中的位置。
给你下面代码试试,把鼠标放置在picture1上来回移动,再按住左右键和Shift键,就知道各参数意思了:
Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Picture1.Cls
Picture1.Print "Button:"; Button
Picture1.Print "Shift:"; Shift
Picture1.Print "X"; X
Picture1.Print "Y:"; Y
End Sub
其中几个参数的解释:
button:鼠标滑动时如果按住左键则返回1,如果是按右键则返回2,没有按任何按键则返回0。
shift:鼠标滑动同时如果同时按住了键盘的Shift键则返回1,如果没按则返回0 。
X和Y:是鼠标滑动时鼠标位置相对于picture控件左上角的坐标,X为横向坐标,Y为纵向坐标,也就是根据XY值能确定鼠标指针在picture中的位置。
给你下面代码试试,把鼠标放置在picture1上来回移动,再按住左右键和Shift键,就知道各参数意思了:
Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Picture1.Cls
Picture1.Print "Button:"; Button
Picture1.Print "Shift:"; Shift
Picture1.Print "X"; X
Picture1.Print "Y:"; Y
End Sub
展开全部
相对于Picture2图像框控件的坐标值,以图像框左上角为(0, 0)坐标
追问
就是按住鼠标然后拖动,松开鼠标处的坐标吗?
追答
就是鼠标移动时的坐标,不需按住,也不需松开,只要移动就触发,你可以用这个代码验证:
Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Picture1.Cls
Picture1.Print "X="; X, "Y="; Y
End Sub
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询