零点起飞学VisualBasic之用户交互的基础鼠标.pptxVIP

第13章 用户交互的基础——鼠标键盘事件事件机制是Visual Basic程序运行的主要方式。Visual Basic中面向对象的编程方法主要响应鼠标和键盘事件。学习本章，读者可以掌握鼠标和键盘事件驱动机制、熟练使用鼠标和键盘事件开发的方法。13.1 使用鼠标基础——鼠标事件鼠标事件是Windows应用程序中最重要的事件之一。用户在应用程序中主要操作使用鼠标操作，响应鼠标事件。其主要包括的事件如表13.1所示。表13.1 鼠标事件类型事 件说 明Click鼠标单击事件DblClick鼠标双击事件MouseMove鼠标在对象上移动事件MouseDown鼠标按下事件Mouseup鼠标松开事件Dragdrop和Dragover鼠标拖动事件本节分别介绍不同鼠标事件的使用方法。13.1.1 常见的鼠标事件在应用程序中鼠标事件是用户和应用程序交互操作的主要方式之一。下面分别介绍几种事件的使用方法。1．Click和DblClick事件在用户按下鼠标按钮并释放时，引发单击Click事件；两次Click事件引发双击DblClick事件。Click和DblClick事件主要是指鼠标左键操作。单击Click事件语法如下：Private Sub object_Click([Index As Integer])参数说明：Object为必需项，表示产生Click事件的控件对象；Click为必需项，表明该事件为鼠标单击事件。Index为可选项，表明该控件在控件数组中的索引。双击DblClick事件语法如下：Private Sub object_DblClick([Index As Integer])参数说明：Object为必需项，表示产生Click事件的控件对象；DblClick为必需项，表明该事件为鼠标双击事件；Index为可选项，表明该控件在控件数组中的索引。2．Mouseup和MouseDown事件MouseDown事件是最常用的鼠标事件。按下鼠标按钮即可引发此事件。Mouseup事件是用户松开按下鼠标事件。该事件可以结合shift参数判断用户在单击鼠标时候是否按下Ctrl和Shift、Alt按键。MouseDown事件语法如下：Private Sub object_MouseDown([Index As Integer,]button As Integer, shift As Integer, x As Single, y As Single)Mouseup事件语法如下：Private Sub object _Mouseup([Index As Integer,]button As Integer, shift As Integer, x As Single, y As Single)参数说明详见表13.2所示。表13.2 Mouseup和MouseDown事件参数说明参数说 明object必需项。返回一个对象表达式，其值是控件列表中一个控件对象Index可选项。返回整数，标识控件数组中的控件元素button可选项。返回整数，标识该事件按下（MouseDown）或者松开（Mouseup）按钮引起的。button参数返回左按钮、右按钮、中间按钮，数值分别为1、2和3shift可选项。返回整数，在button参数指定的按钮被按下或者被松开的情况下。该整数相应于 Shift、Ctrl和Alt键的状态。shift参数是具有相应于Shift键，Ctrl键以及Alt键的数值分别等于1、2和4。如Ctrl和Alt键都被按下时shift的值为6x、y可选项。返回一个指定鼠标指针当前位置的数。x和y的值所表示的总是通过该对象 ScaleHeight、 ScaleWidth、ScaleLeft和ScaleTop属性所建立的坐标系统的方式MouseDown和Mouseup事件在判断Ctrl等按键比Click事件和DblClick事件具有突出的优点。3．MouseMove事件MouseMove事件当鼠标指针在屏幕上移动时引发。鼠标指针位于窗体和控件的边框内时，窗体和控件均可以识别MouseMove事件。标准语法如下：Private Sub Form_MouseMove (Button As Integer, Shift As Integer, X As Single, Y As Single)参数说明详见表13.2所示。4．Dragdrop和Dragover事件拖放动作即将一个控件拖动到一个对象上，并松开鼠标按钮。Dragdrop事件识别何时将控件拖动到对象上。标准语法如下：Private Sub object_Dragdrop([Index As Integer,]source As Control, x As Single, y As Single)参数说明详