在窗体上先后画两个图片框,名称分别为Picture1和banana,banana中添加了香蕉图片(见图1),且将bananA、DragMode属性设置为1。要求程序运行时,可以用鼠标把banana拖曳到Picttne1中(见图2)。能实现此功能的事件过程是

admin2009-03-17  37

问题 在窗体上先后画两个图片框,名称分别为Picture1和banana,banana中添加了香蕉图片(见图1),且将bananA、DragMode属性设置为1。要求程序运行时,可以用鼠标把banana拖曳到Picttne1中(见图2)。能实现此功能的事件过程是______。

选项 A、Private Sub Form_DlagDrop(Source As Control,X As Single,Y As Single)       bananA、Move Picture1.Left+X,Picture1.Top+Y    End Sub
B、Private Sub banana_DragDrop(Source As Control,X As Single,Y As Single)       SourcE.Move Picture1.Lefi+X,Picture1.Top+Y    End Sub
C、Private Sub Picture1_DmgDrop(Source As Contro1,X As Single,Y AS Single)       SourcE.Move Picture1.Left+X,Picture1.Top+Y    End Sub
D、Private Sub Picture1_DragDrop(Source As Control,X As Single,Y As Single)       bananA、Move bananA、Let+X,banan.Top+Y    End Sub

答案C

解析 DragMode属性:用来设置自动或手动拖放模式:缺省值为0(手动方式)。为了让控件自动执行拖放操作,必须把它的属性设为1,该属性即可以在属性窗口中设置,也可以在程序中设置。
拖动意味着移动光标到对象上,按住鼠标,接着移动鼠标使对象在屏幕内滑动以重新定位对象。当释放鼠标按钮时,在拖动对象所在控件边界内放开鼠标会触发DragDrop事件。如果放开鼠标时对象不在一个控件的上面,那么对象定位于窗体本身。
如果一个对象在一个控件(或窗体)上被放开,并且在后者的DragDrop事件中没有放任何内容,那么“被放开”的对象将仍然在窗体上原先位置出现,不会出现其他事情。因此,拖动对象的DragDrop事件不是用来存放有关放开对象时执行某些指令的地方。而应将这些指令放到背景的DragDrop事件中或者拖动对象所放开的目标控件中。
一个DragDrop事件提供三条信息——DragDrop(Source as Comro1,X as Single,Y as Single)。Soume,是已经放开的图片、图标或控件。X和Y值,是放开事件所在目标对象的水平和垂直方向位置。
转载请注明原文地址:https://kaotiyun.com/show/uj1p777K
0

最新回复(0)