第6章键盘-鼠标PPT.pptVIP

第6章 键盘、鼠标的程序设计 学习目标 通过本章学习应理解VB可视化程序设计的中事件驱动程序设计的概念；理解鼠标、键盘事件的触发机制；掌握对鼠标和键盘进行编程的基本技术；掌握窗体与常用组件的重要键盘事件和鼠标事件；初步学会对一些常用VB组件进行程序设计，实现事件驱动的鼠标拖放功能和OLE的鼠标拖放功能。 6.1 键盘事件 窗体以及可接受键盘输入的控件在VB中，对象识别的键盘事件有以下3种： ．KeyPress事件：用户按下并释放一个会产生ASCII码的键时被触发。 ．KeyDown事件：用户按下键盘上任意一个键时被触发。 ．KeyUp事件：用户按下键盘上任意一个键后释放键时被触发。 6.1.1 KeyPress事件 KeyPress事件当用户按下和松开键盘上一个字符键时发生。在某一时刻只有一个控件拥有输入焦点。 被按的键的标准ASCII码将自动传递给keypress事件过程的KeyAscii参数 说明： (1)KeyPress事件只对会产生ASCII码的按键有反应，包括数字、大小写的字母、标点符号、Enter、BackSpace、Esc、Tab等。对于如方向键这样不会产生ASCII码的按键，KeyPress事件不会被触发。 (2)在默认情况下，具有焦点的控件才能接收该事件。一个窗体只有在不具有可视的和有效的控件时或KeyPreview属性被设置为True时才能接收该事件。 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码值。如右图所示，这是按下了a、A、b、B、z、Z、0、1、9、Tab、Backspace等键时显示的ASCII码值。 6.1.2 KeyDown事件和KeyUp事件 KeyDown和KeyUp事件除了可以识别KeyPress事件能识别的键，还可识别键盘上的大多数键，如功能键、编辑键、定位键和数字小键盘上的键等。 1. KeyDown事件 用户按下键盘上某个键时触发此事件。 窗体的KeyDown事件过程： Private Sub Form_KeyDown ( KeyCode As Integer,Shift As Integer) …… End Sub 参数KeyCode是一个按下键的扫描码（即键码），它告诉事件过程用户所按键的物理键位。可以用KeyPress事件中的KeyAscii的ASCII码判断输入的是何字符，用keycode判断按下了哪个键。 Shift参数与位的关系Shift参数值及系统预定义常数含义 例6.3 设计一个窗体，右边放置一组Label标签，标注将在键盘上按什么键，窗体上显示按键的扫描码和ASCII码，没有ASCII码的不显示。 2. KeyUp事件 释放按健便触发相应对象的KeyUp事件。 KeyUp和KeyDown事件返回的是被按下或释放的键盘扫描码和组合键的状态。其事件过程形式如下： 窗体的KeyUp事件过程： Private Sub Form_KeyUp(KeyCode As Integer,Shift As Integer)…… End Sub Private Sub Object_KeyUp([Index As Integer，] KeyCode As Integer，Shift As Integer) …… End Sub 其中：KeyCode是用户所按键的扫描码。它告诉事件过程用户所按键的物理键位，对于有上档字符和下档字符的键，其KeyCode为下档字符的ASCII码。 KeyPress与KeyDown及KeyUp事件的区别 例6.4 键盘事件的用法，程序运行界面如图6.7所示。Text1控件接收键盘输入并触发 KeyPress、KeyDown和KeyUp事件，在不同的事件中用文本框或标签显示不同的参数值，同时用三个复选框显示是否按下了控制键。 窗体的事件过程代码： Private Sub Form_Activate() Text1.SetFoc