visual basic程序设计(等级考试版)下ppt

《visual basic程序设计(等级考试版)下ppt》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、VisualBasic程序设计(等级考试版)史春联主编高等院校应用型特色规划教材第1章VisualBasic程序开发环境第2章对象及其操作第3章简单程序设计第4章VisualBasic程序设计基础第5章数据的输入输出第6章控制结构第7章数组第8章常用标准控件第9章过程第10章键盘与鼠标事件过程第11章菜单程序设计第12章VisualBasic程序开发环境第13章多重窗体程序设计环境应用第14章文件处理第15章多媒体应用开发第16章数据库编程初步第10章键盘与鼠标事件过程KeyPress事件KeyDown和KeyUp事

2、件鼠标事件鼠标光标的形状拖放10.1KeyPress事件当击打键盘上的某个按键时，将发生KeyPress事件。该事件可用于窗体、复选框、组合框、命令按钮、列表框、图片框、文本框、滚动条及与文件有关的控件。严格地说，当按下某个键时，所触发的是拥有输入焦点（Focus）的那个控件的KeyPress事件。KeyPress事件过程一般格式为：PrivateSubText1_KeyPress(KeyAsciiAsInteger)EndSubKeyPress事件带有一个参数，KeyAsciiAsInteger。KeyPress事

3、件用来识别按键的ASCII码。参数KeyAscii是一个预定义的变量，执行KeyPress事件过程时，KeyAscii是所按键的ASCII码。10.1KeyPress事件例10.1编写口令程序。用文本框的Password属性编写过口令程序，下面的口令程序是用KeyPress事件编写的。首先在窗体上画一个标签和一个文本框，如图所示PrivateSubForm_Load()Text1.Text="********"Text1.FontSize=10Label.FontSize=16Label.FontBold=TrueL

4、abel.FontName="宋体"Label.Caption="请输入密码："EndSubPrivateSubText1_KeyPress(KeyAsciiAsInteger)StaticPasswordAsStringStaticCounterAsIntegerStaticNumAsIntegerNum=Num+1IfNum=6ThenEndCounter=Counter+1Password=Password+Chr$(KeyAscii)KeyAscii=0Text1.Text=String$(Counter,"

5、*")IfLCase$(Password)="aaa"ThenText1.Text=""Password=0MsgBox"密码正确，请继续"Counter=0Print"Continue……"ElseIfCounter=3ThenCounter=0Password=""Text1.Text=""MsgBox"密码不正确，请查实后重新输入！"EndIfEndSub10.1KeyPress事件程序运行后，在文本框中输入口令，如果口令正确，则显示相应的信息，单击“确定”按钮后，将显示一行信息；如果口令不正确，则要求重新输入

6、。3次输入的口令都不正确，则停止输入，并结束程序。10.2KeyDown和KeyUp事件KeyDown和KeyUp事件返回的是键盘的直接状态，而KeyPress并不反映键盘的直接状态。换言之，KeyDown和KeyUp事件返回的是“键”，而KeyPress事件返回的是“字符”的ASCII码。例如，当按字母键“A”时，KeyDown所得到的KeyCode码（KeyDown事件的参数）与按字母键“a”是相同的，而对KeyPress来说，所得到的ASCII码不一样。10.2KeyDown和KeyUp事件KeyDown和Ke

7、yUp事件都有两个参数，即KeyCode和Shift，例如：PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)EndSub或PrivateSubForm_KeyUp(KeyCodeAsInteger,ShiftAsInteger)EndSub两个参数的含义如下：1.KeyCode它是按键对应的扫描码。该码以“键”为准，而不是以“字符”为准。2.Shift转换键。它指的是3个转换键的状态，包括Shift、Ctrl和Alt，这3个键分别以二进制形式表示，每个键有

8、3位，即Shift键为001，Ctrl键为010，Alt键为10010.2KeyDown和KeyUp事件例10.2编写一个程序，但按下键盘上的某个键时，输出该键的KeyCode码在实际应用中，KeyCode码有着重要的作用，利用它可以根据按下的键采取相应的操作。这个程序用来输出每个键的KeyCode码。程序如下：PrivateSubForm_K