窗体上已有1个名称为Picture1的图片框,要求实现下面2个功能之一: (1)在窗体上移动鼠标时,立即将Picture1显示在鼠标位置 (2)在窗体上单击鼠标时,立即将Picture1显示在鼠标位置下面不能实现上述任何功能的事件过程是

admin2016-12-13  37

问题 窗体上已有1个名称为Picture1的图片框,要求实现下面2个功能之一:
(1)在窗体上移动鼠标时,立即将Picture1显示在鼠标位置
(2)在窗体上单击鼠标时,立即将Picture1显示在鼠标位置下面不能实现上述任何功能的事件过程是

选项 A、Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)
Picture1.Move X,Y
End Sub
B、Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single)
Picture1.Move X,Y
End Sub
C、Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X  As Single,Y As Single)
Picture1.CurrentX=X:Picture1.CurrentY=Y
End Sub
D、Private Sub Form_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single)
Picture1.Move X,Y
End Sub

答案C

解析 图片框的CurrentX和CurrentY属性会在程序运行时,返回或设置下一次打印或绘图位置的水平坐标和垂直坐标。Move方法用于移动窗体或控件,其语法:对象名.MoveLeft[,Top][,Width][,Height]。其中,LeR和Top参数分别表示对象左侧的水平坐标和上侧的垂直坐标,Width和Height参数分别表示对象新的宽度和高度。
转载请注明原文地址:https://kaotiyun.com/show/nBGp777K
0

最新回复(0)