第六章键盘鼠标的程序的设计.docVIP

第6章 键盘、鼠标的程序设计 本章学习目标 通过本章学习应理解VB可视化程序设计的中事件驱动程序设计的概念；理解鼠标、键盘事件的触发机制；掌握对鼠标和键盘进行编程的基本技术；掌握窗体与常用组件的重要键盘事件和鼠标事件；初步学会对一些常用VB组件进行程序设计，实现事件驱动的鼠标拖放功能和OLE的鼠标拖放功能。 在前面我们已经学习了通用过程和一些常用的事件过程，那么在本章，我们继续学习键盘和鼠标的有关事件过程。在键盘事件的过程中可以处理当按下或释放键盘上某个按键时所执行的一些操作。而鼠标的事件过程可以用来处理鼠标按钮和光标位置移动有关的一些操作。 Windows程序的工作模式，称为事件（也称消息）驱动方式。所谓“事件”，是指作用于某个对象上的一种操作或动作，如运行程序时用鼠标单击窗体上菜单条的某个命令项时，“单击”（Click）这个动作就是作用在该命令项上的一个事件，也可以描述为该命令项发生了Click事件，当双击窗体上的某个命令按钮时，“双击”（Dblclick）就是作用在该命令按钮上的一个事件。VB中的每个对象通常都可以响应多个不同的事件。 VB应用程序除了能响应鼠标的单击(Click)和双击(DbClick)事件外，还能响应多种其他鼠标事件和键盘事件。本章主要介绍VB对象能够识别的3种键盘事件：KeyPress、KeyDown、KeyUp事件和3个鼠标事件：MouseDown、MouseUp、MouseMove事件。 此外，VB应用程序还可同时支持事件驱动的鼠标拖放功能和OLE的鼠标拖放功能。本章介绍了VB提供的用于鼠标拖放操作处理的DragMode和DragIcon属性、Drag方法、DragOver和D)ragDrop事件。同时，简要介绍了VB所支持的OLE拖放的实现方法。 6.1 键盘事件 键盘事件是用户敲击键盘时触发的事件。通常对于接受文本输入的控件，在键盘事件中进行编程检测输入数据的合法性或对于不同键值的输入实现不同的操作。如文本框TextBox，当需要控制文本框中输入的内容时，可以通过对键盘事件编写“事件过程”实现。 窗体以及可接受键盘输入的控件如TextBox、CommandButton、PictureBox、ComboBox等控件都可识别键盘事件。 在VB中，对象识别的键盘事件有以下3种： ．KeyPress事件：用户按下并释放一个会产生ASCII码的键时被触发。 ．KeyDown事件：用户按下键盘上任意一个键时被触发。 ．KeyUp事件：用户按下键盘上任意一个键后释放键时被触发。 6.1.1 KeyPress事件 KeyPress事件当用户按下和松开键盘上一个字符键时发生。该事件可用于窗体、文本框、复选框、组合框、列表框、命令按钮、图片框、滚动条以及与文件有关的控件。当按下某个键时，所触发的是拥有输入焦点的那个控件的keyPress事件。在某一时刻只有一个控件拥有输入焦点，如果当前窗体中没有控件拥有焦点，那就是当前窗体具有焦点。KeyPress事件检测的键有Enter、Tab、BackSpace以及键盘上的字母、数字和标点符号键，对于其他功能键、编辑键和定位键，则不作响应。该事件发生时，被按的键的标准ASCII码将自动传递给keypress事件过程的KeyAscii参数，这是个预定义的变量。在程序中，通过访问该参数，即可获知用户按下了哪一个键，并可识别字母的大小写。KeyPress事件过程形式如下： 窗体的KeyPress事件过程： Private Sub Form_KeyPress ( KeyAscii As Integer ) End Sub 窗体上控件的KeyPress事件过程： Private Sub Obiect_KeyPress([Index As Integer,] KeyAscii As Integer) End Sub 其中[Index As Integer,]可选参数，是当有一组相同的控件时才有，其用来传递触发KeyPress事件的控件在控件数组中的序号。 例6.1 设计一个简单窗体，其中放置一个命令按钮，当运行程序时，用户在键盘上按下任意ASCII码键时，窗体中显示所按键的ASCII码值。如图6.1所示，这是按下了a、A、b、B、z、Z、0、1、9、Tab、Backspace等键时显示的ASCII码值。 图6.1 窗体中显示所按键的ASCII码值 这里只需为Command1按钮设计KeyPress事件处理代码，见图6.2。 图6.2 编写KeyPress事件的处理代码 在默认情况下，用户操作时，当窗体和控件同时存在时，控件的KeyPress事件触发优先级高于窗体的，这时进行按下并释放的键盘操作时，直接触发具有控制焦点的控件的KeyPress事件，窗体本身不会接