VisualBasic 程序设计 vb8教程

《VisualBasic 程序设计 vb8教程》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第八章键盘与鼠标事件过程前面已介绍通用过程和一些常用的事件过程，本章将介绍与键盘和鼠标有关的事件过程。使用键盘事件过程，可以处理当按下或释放键盘时所执行的操作，而鼠标事件过程可以用来处理与鼠标光标的移动和位置有关的操作。要想学好键盘事件，需要同学们注意按键的两个值：KeyAscii:这是按键上“字符”的ASCII值。例如：“A”的KeyAscii的值为65，小“a”的KeyAscii的值为97。对于KeyAscii值来说，大小写字母是不同。KeyCode：这是一个键值，键盘上的每一个键都有一个确定

2、的键值。简单来说就是，大小写字母返回的KeyCode是一个值。因为我们按下的是同一个键。键值相同。例如：“A”和“a”它的KeyCode值都为&H41。键盘事件有哪些事件？1、KeyPress事件2、KeyDown事件3、KeyUp事件10.1KeyPress事件键盘事件1、何时发生？1）当压下键盘上的某个键时，将发生KeyPress事件。严格地说，当按下某个键时，所触发的是拥有输入焦点（Focus）的那个控件的KeyPress事件。2）该事件可用于窗体、复选框、组合框、命令按钮，列表框，图片框、

3、文本框，滚动条及与文件有关的控件。3）在某一时刻，输入焦点只能位于某一个控件上，如果窗体上没有活动的或可见的控件，则输入焦点位于窗体上。当一个控件或窗体拥有输入焦点时，该控件或窗体将接收从键盘上输入的信息。例如：假定一个文本框拥有输入焦点，则从键盘上输入的任何字符都将在该文本框中回显。提问：当想出现按下C键就结束整个工程的运行时，则应该如何编写程序呢？10.1KeyPress事件键盘事件2、如何编写KeyPress事件过程？10.1KeyPress事件键盘事件1）在窗体上画一个控件（指上面所讲的可

4、以发生KeyPress事件的控件）。2）双击该控件，进入程序代码的窗口后。3）从“过程”框中选取KeyPress，即可定义KeyPress事件过程，一般格式为：PrivateSub对象名_KeyPress（KeyAsciiAsInteger）EndSub例如：编写一个控件的KeyPress事件过程。注意：1）KeyPress事件带有一个参数，这个参数有两种形式。第一种形式是IndexAsInteger，只用于控件数组。第二种形式是KeyAsciiAsInteger，用于单个控件。（例如刚才所讲的例

5、子。）2）KeyPress事件用来识别按键的ASCII码。参数KeyAscii是一个预定义的变量，执行KeyPress事件过程时，KeyAscii是所按键的ASCII码。例如，按下“A”键，KeyAscii的值为65；如果按下“a”键，则KeyPress的值为97，等等。10.1KeyPress事件键盘事件3、keyPress事件的作用：1）利用KeyPress事件可以对输入的值进行限制。假定在窗体上建立一个文本框（Text1)，然后双击该文本框进入程序代码窗口，并从“过程”框中选择KeyPres

6、s，编写如下事件过程：PrivateSubText1_KeyPress(KeyAsciiAsInteger)IfKeyAscii<48OrKeyAscii>57ThenBeepKeyAscii=0Endif……EndSub该过程用来控制输入值，它只允许输入0（ASCII码48）~9（ASCII码57）的阿拉伯数字。如果输入其他字符，则响铃（Beep），并消除该字符。10.1KeyPress事件键盘事件2）用KeyPress可以捕捉击键动作。例如，用下面的事件过程可以模拟打字机PrivateSubT

7、ext1_KeyPress(KeyAsciiAsInteger)IfKeyAscii=13ThenPrinter.printText1.textEndifKeyAscii=0Endsub程序中的KeyAscii=0用来避免输入的字符在文本框中回显。运行上面的程序，在文本框中输入一行字符，按回车键后，这行字符即在打印面上打印出来。10.1KeyPress事件键盘事件3）在KeyPress过程中可以修改KeyAscii变量的值。如果进行了修改，则VB在控件中输入修改后的字符，而不是用户输入的字符。例如

8、：PrivateSubText1_KeyPress（KeyAsciiAsInteger)IfKeyAscii>=65AndKeyAscii<=122ThenKeyAscii=42EndifEndSub上述过程对输入的字符进行判断，如果其ASCII码大于等于65（字母“A”），并小于等于122（小写字母“z”），则用星号（ASCII码为42）代替。运行上面的过程，如果从键盘上输入“Testing“，则在文本框中显示“********”。利用类似的操作，可以编写口令程序。10.1Key