友情提示:同学您好,此页面仅供预览,在此页面学习不会被统计哦! 请进入学习空间后选择课程学习。

        在释放鼠标按钮后可能会希望改变源控件的位置,为把控件移动到新的位置处,应对任何已被允许拖动的控件使用Move方法。

将以下过程添加到窗体的DragDrop事件中:

   Private Sub Form_DragDrop(Source As Control)

         Source.MoveX, Y

End Sub