零基础学Visual.Basic第8章.ppt

第8章 键盘、鼠标事件和图形 Visual Basic为用户提供了键盘、鼠标事件用于响应键盘操作和鼠标操作。在Visual Basic中，大多数控件都有键盘事件和鼠标事件。这一章将讲述与键盘和鼠标相关的内容，除此之外，还有通常在鼠标事件中出现的关于绘制图形方面的内容。 8.1 键盘事件 键盘事件共有三种事件，分别为KeyPress （敲击键盘）事件、KeyDown（按键被按下）事件和 KeyUp（按键被松开） 事件。KeyPress事件当敲击键盘时触发；KeyDown事件当键盘上的按键被按下时触发；KeyUp事件则当键盘上按下的键被松开时触发。 8.1.1 ASCII码 ASCII是美国标准信息交换码 (American Standard Code for Information Interchange) 的缩写。码值从 0 到 255，代表了字母、数字、标点符号和其他字符。ASCII 码是一种标准化的编码，用以在计算机之间或计算机与外围设备之间交换信息。 8.1.2 处理“敲击键盘” 当用户敲击键盘上的有ASCII相对应的键时，KeyPress 事件就会被触发。Visual Basic中能够得到焦点的控件都能够响应该事件。例如，窗体、图片框、文本框、按钮等等，下面通过文本框的KeyPress 事件来说明该事件。首先，在窗体上画出一个文本框Text1，然后双击其打开代码编辑器窗口。在过程框中选择“KeyPress”后，代码编辑区内就会出现该事件的过程头和过程尾， 8.1.3 处理“按键被按下”和“按键被松开” KeyDown事件在键盘上的某个键被按下的一刹那触发，而KeyUp 事件是在松开（抬起）按键时被触发。其实，这两个事件可以说是KeyPress （敲击）动作的分解，因为KeyPress包括按下键和松开键两个动作。象KeyPress事件一样，Visual Basic中的大部分控件都能接收这两个事件。 8.1.4 应用案例——使用方向键移动坦克 【例 8.4】如图8.3所示，在窗体中画一个图片框将其名称设置为picGrand，在图片框内部再画一个图像框并起名叫imgTank。程序运行的效果是： 8.2 鼠标事件 鼠标事件一共有五个（不包括托放事件），分别是Click、DblClick、MouseDown、MouseUp和MouseMove。前面的章节中已经讲述过关于Click、DblClick事件的内容。本节主要讲述后面三个事件。 Click、DblClick事件只能识别鼠标单击或双击动作，而通过MouseDown，MouseUp，MouseMove事件可以使应用程序对鼠标位置及状态的变化作出响应。Viusal Basic中窗体和大多数控件都能够识别这些事件。 8.2.1 处理“鼠标键被按下” 按下鼠标键的一刹那会触发MouseDown 事件，其中鼠标键包括鼠标左键、中键（滑轮）和右键。 8.2.2 处理“鼠标键被松开” MouseUp事件在松开鼠标键的一刹那被触发。MouseUp 事件也有Button、Shift、X、Y等4个参数，其解释意义和MouseDown事件的相同。通常，编程人员都将菜单弹出语句写在该事件里，详细内容在本书第9章讲述。在此可以做个很小的试验，在Windows的桌面上按下鼠标右键不要松开，这时不会有弹出式菜单出现，而当你松开鼠标右键时弹出式菜单就出现了，这就说明程序写在了MouseUp 事件里，而并没有写在MouseDown事件内。其原因是如果菜单弹出程序写在了MouseDown事件内，有时会屏蔽掉正常的鼠标选择功能。 8.2.3 处理“鼠标移动” MouseMove事件在鼠标移动时被触发。其格式为： Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) 8.3 拖放 Visual Basic中除了如前所述的鼠标事件可以完成很多功能以外，实际上还有一种操作方法可以用来完成某些功能，即拖放操作——使用鼠标器将对象从一个地方拖放到另一个位置再放下。在整个“拖放”操作过程中，用户首先在源对象上按下鼠标左键不放，然后把源对象拖放到目标对象上释放（松开）鼠标键。为了有助于理解这种拖放，可以把整个拖放过程分解成两个操作：一个是发生在源对象的“拖”操作；另一个是发生在目标对象上的“放”操作，即把源对象“放”在目标对象上。在字处理程序中，拖放操作的用途之一就是将文本从一个地方移到另一个地方。另一个用途就是将不需要的东西拖到“回收站” 里，从而在屏幕上将其清除。 8.3.1 拖放操作实例——垃圾桶的实现 通过两个事件过程和少量属性设置就可以控制拖放操作。将某对象的DragMode 属性设置为1