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

Windows环境中,我们经常会遇到鼠标拖放的操作。例如,利用鼠标将一个文件或文件夹拖动到回收站中即可删除它。

       在VB中,上述操作被分解成两个步骤:按下鼠标按钮并移动对象的操作称为拖动(Drag);在目标对象上释放鼠标按钮的操作称为放置 (Drop)

在关于鼠标拖放的程序设计中,经常打交道的项目有5个:

        DragMode——属性

        DragIcon——属性

        DragDrop——事件

        DragOver——事件

        Drag——方法

       其中,属性可以通过属性窗口或直接使用赋值语句在代码中进行设置;利用事件可以完成程序的相应功能;Drag方法则通常用于启动或停止手工的拖动操作。

     DragMode属性决定鼠标的拖动模式,其值可以是01

     将DragMode的值设置为1,则该控件的拖动模式为自动拖动,程序运行期间,用户随时可以用鼠标拖动该控件。

     若将DragMode的值设置为0,则该控件的拖动模式为手工拖动,这是VB中缺省的拖动模式。初看起来,好象DragMode0的控件无法拖动,但其实不然。若要进行鼠标拖动操作的话,可利用Drag方法在代码中启动手工拖动,并在需要的时候,停止该控件的手工拖动。

    自动拖动和手工拖动相比,自动拖动模式设置简单,手工拖动处理起来麻烦一些,但手工拖动可使程序设计更加方便灵活,用户可通过代码随时启动或终止手工拖动。

    鼠标拖动操作发生时,正被拖动的控件不识别其他鼠标事件