Visual Basic程序设计实用教程 教学课件 作者 匡松 缪春池 VB第5章.pptVIP

第5章 键盘与鼠标事件 【学习内容】 Visual Basic是典型的可视化开发工具，采用事件驱动的开发模式。本章主要介绍键盘与鼠标的事件过程，以及在程序中如何实现鼠标指针的改变和拖放对象。要求掌握Windows程序设计中重要的事件驱动概念、键盘事件（KeyPress事件、KeyDown事件和KeyUp事件）、鼠标事件（MouseMove、MouseDown和MouseUp事件）、改变鼠标指针的形状和拖放及其相关的对象属性、事件和方法。 5.1 Visual Basic的事件驱动程序开发方式 5.1.1 事件驱动模型 在事件驱动的应用程序中，代码不是按照预定的路径执行，而是在响应不同的事件时执行不同的代码片段。事件可以由用户操作触发.这些事件的顺序决定了代码执行的顺序，因此应用程序每次运行时所经过的代码的路径都是不尽相同的。 因为事件被触发的顺序是无法预测的，所以在代码中必须对执行时的“各种状态”作一定的假设。当作出某些假设时（例如，假设在运行处理某一输入字段的过程之前，该输入字段必须包含确定的值），应该组织好应用程序的结构，以确保该假设始终有效（例如，在输入字段中有值之前，禁止使用启动该处理过程的命令按钮）。 5.1.2 交互式开发 Visual Basic在编程者输入代码时便进行解释，即时捕获并突出显示大多数语法或拼写错误。使编程感觉就像一位专家在监视代码的输入。 除即时捕获错误以外，Visual Basic也在输入代码时部分地编译该代码。当准备运行和测试应用程序时，只需极短时间即可完成编译。如果编译器发现了错误，则将错误突出显示于代码中。这时可以更正错误并继续编译，而不需从头开始。 由于Visual Basic可以在开发应用程序时，频繁地编译和运行应用程序。通过这种方式，代码运行的效果可以在开发时进行测试，而不必等到编译完成以后。 5.1.3 事件驱动应用程序的工作方式 事件是窗体或控件识别的动作。在响应事件时，事件驱动应用程序执行Visual Basic代码。Visual Basic的每一个窗体和控件都有一个预定义的事件集。如果其中有一个事件发生，而且，在关联的事件过程中存在代码，则Visual Basic调用该代码。 尽管Visual Basic中的对象自动识别预定义的事件集，但要判定它们是否响应具体事件以及如何响应具体事件则是编程者的责任了。代码部分（即事件过程）与每个事件对应，当让控件响应事件时，就把代码写入这个事件的事件过程之中即可。 5.1.3 事件驱动应用程序的工作方式 对象所识别的事件类型多种多样，但多数类型为大多数控件所共有。例如，大多数对象都能识别Click事件：如果单击窗体，则执行窗体的单击事件过程中的代码；如果单击命令按钮，则执行命令按钮的Click事件过程中的代码。 下面是事件驱动应用程序中的典型事件序列。 （1）启动应用程序，装载和显示窗体。 （2）窗体（或窗体上的控件）接收事件。事件可由用户触发（例如键盘操作），也可由系统触发（例如定时器事件），也可由代码间接触发（例如当代码装载窗体时的Load事件）。 （3）如果在相应的事件过程中存在代码，就执行代码。 （4）应用程序等待下一次事件。 5.2 键 盘 事 件 5.2.1 KeyPress事件 当按下或松开键盘上的某个键时，将触发KeyPress事件。KeyPress事件主要用来接收数字、字母、Enter、Tab和Backspace等键的ASCII字符。 KeyPress事件不显示键盘的物理状态（Shift键），而只是传递一个字符。当按下键盘上的某个键时，触发的是获得焦点（FOCUS）的控件的KeyPress事件。在同一时刻，只能有一个控件获得焦点。如果窗体上没有活动的或可见的控件，则焦点位于窗体上。拥有获得焦点的对象（控件或窗体）可以接收从键盘上输入的信息。 5.2.2 KeyDown和KeyUp事件 在程序运行过程中，当用户按下键盘上某个键时，触发KeyDown事件；当释放该键时，将触发KeyUp事件。与KeyPress事件不同，KeyDown和KeyUp事件返回的是键盘的直接状态，即该键的“扫描码”值。 KeyDown和KeyUp事件可以处理不被KeyPress识别的特殊键，如F1~F12的功能键、定位键以及这些键与Shift、Ctrl、Alt特殊键的组合等。 5.2.2 KeyDown和KeyUp事件 下面是一个应用文本框的KeyDown事件和KeyUp事件的程序代码： Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyA And Sh