全套课件·《Visual1

1、1Visual Basic程序设计简明教程2第1章 概述本章内容： 程序设计语言 VB语言的特点 VB程序的开发环境 简单的VB程序介绍 Visual Basic程序设计简明教程31.1 程序设计语言关于程序：程序：是一组有序指令的集合，由某种程序设计语言编写而成。程序设计语言：是人与计算机之间进行交流的工具。Visual Basic程序设计简明教程41.1 程序设计语言 面向机器的程序设计语言机器语言是计算机能够直接执行的二进制指令代码，每条指令都用0和1组成的序列串表示，这些指令的集合就是指令系统。汇编语言主要由汇编指令构成，这些汇编指令与机器语言的二进制指令一一对应。机器语言和汇编语言都

2、是面向机器的程序设计语言，它们与计算机的硬件紧密相关。Visual Basic程序设计简明教程51.1 程序设计语言 面向过程的程序设计语言 FORTRAN语言和随后出现的BASIC语言、Pascal语言、COBOL语言以及C语言等等，都被称为高级语言。 程序员在使用高级语言编写程序时，不需要熟悉计算机的指令系统，可以将精力集中于解题思路和方法上。 计算机不能直接执行高级语言程序，必须先翻译成为机器语言程序之后才能执行。 Visual Basic程序设计简明教程61.1 程序设计语言 面向对象的程序设计语言 面向对象的程序设计方法力求符合人们自然的思维习惯，运用类和对象的观点描述问题域，然后用

3、程序设计语言对问题进行描述和实现。面向对象的程序设计语言大致可以分为两类，一类是纯面向对象语言，例如Eiffel语言和Java语言；另一类是混合型面向对象语言，它们往往是由面向过程的语言发展而来的，例如C+语言和Visual Basic语言。 返回Visual Basic程序设计简明教程71.2 VB语言的特点VB语言的发展概况：Visual Basic语言（简称VB）是微软公司推出的基于Windows环境的应用软件开发工具，其语法基础是Basic语言。微软公司于1991年推出VB 1.0版，历经数年的更新换代，1998年升级为VB 6.0版，并有学习版、专业版和企业版等3种版本。Visual

4、 Basic程序设计简明教程8VB语言的特点 可视化的程序设计方法 结构化的程序设计语言 事件驱动的编程机制 数据库访问 良好的可扩充性 返回Visual Basic程序设计简明教程91.3 VB程序的开发环境VB6.0的启动：在“开始”菜单中的“程序”菜单项中，选择“Microsoft Visual Studio 6.0”级联菜单中的“Microsoft Visual Basic 6.0”命令，即可启动VB 6.0。首先弹出“新建工程”对话框，其中列出了VB 6.0能够创建的工程类型。系统默认的工程类型是“标准EXE”。 Visual Basic程序设计简明教程10 Visual Basic

5、 6.0项目类型（1）标准EXE项目（2）ActiveX DLL项目 （3）ActiveX EXE项目 （4）ActiveX 控件项目 （5）ActiveX 文档项目 （6）DHTML 应用程序项目 （7）IIS 应用程序项目 Visual Basic程序设计简明教程11新建工程：图1-1 “新建工程”对话框Visual Basic程序设计简明教程12Visual Basic 6.0 集成开发环境图1-2 Visual Basic 6.0集成开发环境 Visual Basic程序设计简明教程13菜单组成：“文件”菜单“编辑”菜单“视图”菜单“工程”菜单“格式”菜单“调试”菜单“运行”菜单“工具

6、”菜单“外接程序”菜单 “文件”菜单：（1）新建工程 （2）打开工程（3）添加工程 （4）移除工程（5）保存工程（6）工程另存为（7）保存文件（8）文件另存为（9）生成工程 Visual Basic程序设计简明教程14图1-3 “文件”菜单 文件菜单“编辑”菜单：“编辑”菜单用于编辑操作，以方便对工程进行修改。图1-4 “编辑”菜单Visual Basic程序设计简明教程15“视图”菜单“视图”菜单用于显示各种窗口图1-5 视图菜单栏“工程”菜单“工程”菜单用于为当前工程创建模块、引用对象或提供各种设计器。图1-6 工程菜单栏Visual Basic程序设计简明教程16“格式”菜单 “格式”菜

7、单用于界面设计，可以使得界面中的控件按照一定的规则有序排列。图1-7 格式菜单栏 “调试”菜单“调试”菜单用于调试、监视程序。图1-8 调试菜单栏Visual Basic程序设计简明教程17“运行”菜单“运行”菜单用于执行程序。图1-9 运行菜单栏“工具”菜单图1-10 工具菜单栏Visual Basic程序设计简明教程18“外接程序”菜单图1-11 外接程序菜单栏 工具栏：图1-12 选取工具栏Visual Basic程序设计简明教程19表1-1 标准工具栏上的图标按钮Visual Basic程序设计简明教程20续表1-1 标准工具栏上的图标按钮返回Visual Basic程序设计简明教程2

8、11.4 简单的VB程序介绍 建立VB应用程序的方法：创建一个工程为窗体添加对象设置对象属性编写代码 运行工程 调试工程 保存工程 Visual Basic程序设计简明教程22控件的画法： l单击工具箱中的控件按钮，在窗体编辑区拖动鼠标画出对应的控件。l双击工具箱中的控件按钮，即可自动在窗体中央画出对应的控件，再拖动到适当位置。l按住Ctrl键，单击工具箱中的控件按钮，松开Ctrl键，在窗体编辑区拖动鼠标可画出多个对应的控件。画完之后单击工具箱中的其他控件。 Visual Basic程序设计简明教程23程序的执行：编译运行解释运行VB的三种工作模式:设计、运行、和中断。生成可执行文件(EXE)

9、，可以在Windows环境下直接运行。Visual Basic程序设计简明教程24可视化程序设计的概念： 对象（Object） 对象的属性（Property）对象的方法（Method） 对象事件（Event） 事件过程 Visual Basic程序设计简明教程25对象：对象是实体或者事物的抽象表示。 对象由属性和方法组成，属性描述对象的特征，方法是对象所能够执行的操作。 Visual Basic程序设计简明教程26事件：事件是由系统预先设置的，能够被对象识别和响应的动作。事件通常由用户触发，例如鼠标单击、键盘输入等等；有时也可以由系统触发，例如定时器产生定时信号。 不同类的对象能够识别的事件有

10、所不同。 Visual Basic程序设计简明教程27事件过程：事件过程是一个相对独立的代码段，一旦触发某个事件并被对象识别之后，就会自动执行。 为了使程序中的某个对象在识别了一个特定事件之后，能够按照程序员的意图进行正确的响应，就必须针对这个特定事件，为该对象编写相应的事件过程。 返回28第2章 VB语言基础本章内容： 数据类型 常量与变量 运算符与表达式 语句 窗体2022/7/20Visual Basic程序设计简明教程292.1 数据类型计算机中的数据是现实世界中信息的具体表现形式，它有一定的数据类型，数据类型确定了数据的取值范围和能够进行的操作。在计算机的存储器中，不同类型的数据所占

11、存储空间的长度也有所不同。 2022/7/20Visual Basic程序设计简明教程30VB 语言的数据类型 数据类型数值类型字节型双精度型整型单精度型长整型货币型字符型逻辑型日期型对象型变体型2022/7/20Visual Basic程序设计简明教程31标识符 （1）关键字关键字又称保留字，是VB语言预先规定的具有固定含义的一些单词。（2）标识符 标识符的命名规则是，以字母开始，由字母、下划线和数字组成。 标识符不能与关键字同名。在标识符中并不区分字母的大小写。 返回2022/7/20Visual Basic程序设计简明教程322.2 常量与变量常量是指在程序执行期间其值不发生变化的量，变

12、量的字面含义是指在程序执行期间其值可以变化的量，实际上对应了内存的一段存储空间。常量有不同的数据类型，它可以分为直接常量和符号常量。 2022/7/20Visual Basic程序设计简明教程33 2.2.1 常量整型常量（1）十进制整数。 （2）八进制整数，以&或者&O作为前缀。 （3）十六进制整数，以&H作为前缀。 如果在一个整型数据的尾部附上&，则表示长整型常量。 2022/7/20Visual Basic程序设计简明教程342.2.1 常量实型常量（1）定点形式，由数字和小数点组成。 （2）指数形式，由尾数、指数符号（E）和指数组成。尾数不能省略，指数是整数。 如果在一个实型数据的尾部

13、附上#，或者用指数符号（D）代替指数符号（E），则表示双精度型常量。2022/7/20Visual Basic程序设计简明教程352.2.1 常量字符型常量字符型常量又称为字符串，是由一对双引号括起来的字符序列，例如“CHINA”、“Mp3”和“集结号”等等。字符串的长度是指字符串中字符的个数，“”是空串，表示不包含任何字符，长度为0。VB采用Unicode编码，用两个字节表示一个字符，每一个字符对应一个Unicode码，汉字也有自己的Unicode码。 2022/7/20Visual Basic程序设计简明教程362.2.1 常量逻辑型常量逻辑型常量只有True和False两个值，分别表示“

14、真”和“假”。2.2.1 常量日期型常量l日期型常量由一对“#”括起来，表示日期和时间。 l标准格式：#月/日/年 时/分/秒 AM|PM# 2022/7/20Visual Basic程序设计简明教程372.2.1 常量符号常量定义符号常量的一般格式为： Const 符号常量As 类型=表达式例如： Const PI As Single=3.14159 VB提供了很多符号常量，它们均以vb开头，程序员可以在程序中直接使用。 2022/7/20Visual Basic程序设计简明教程382.2.2 变量变量代表了内存中某一段存储空间，其中可以存放数据即变量的值，存储空间的大小则由变量的数据类型来

15、决定。变量有名字，程序员在程序中可以通过变量名访问变量所对应的内存空间。变量的取值范围是有限的，而且其所占内存的字节数越多，相应的取值范围就越大。 2022/7/20Visual Basic程序设计简明教程39VB基本类型的变量 类型关键字类型符所占字节数取值范围字节型Byte10255整型Integer%2-3276832767长整型Long&4-21474836482147483647单精度型Single!4-3.410-38+3.41038双精度型Double#8-1.710-308 +1.710308货币型Currency8-922337203685477.58089223372036

16、85477.5807逻辑型Boolean2True或者False字符型String$字符串的长度日期型Date8100年1月1日9999年12月31日对象型Object4变体型Variant2022/7/20Visual Basic程序设计简明教程40变量定义语句 Dim 变量1 As 类型,变量2 As 类型,例如： Dim a As Integer, b As Single, c As String 如果定义变量时在其尾部附上类型符，则可以省略类型说明部分。 Dim a%, b!, c$ 2022/7/20Visual Basic程序设计简明教程41字符串变量 字符串变量一般能够存放不固定

17、长度的字符串，也可以在程序中定义定长的字符串变量。 例如：Dim s As String * 20 如果变量未经定义而直接使用，或者在定义时没有进行类型说明，则系统默认该变量为变体型（Variant）。 返回2022/7/20Visual Basic程序设计简明教程422.3 运算符与表达式运算符用于对数据进行运算，被运算的数据称为操作数。表达式描述对哪些数据以什么顺序施以什么样的操作，它由运算符和操作数组成。操作数既可以是常量，也可以是变量，还可以是函数调用。 2022/7/20Visual Basic程序设计简明教程432.3 运算符与表达式算术表达式运算符优先级功能1指数（幂运算）-2取

18、负*3乘 /3除 4整除Mod5取余+6加-6减2022/7/20Visual Basic程序设计简明教程44说明： 整除（）运算是取整数相除的商，取余（Mod）运算是取整数相除的余数 。除（/）与整除（）不同，它是针对实数的除法运算。 指数（）运算的幂次既可以是整数，也可以是实数。 2022/7/20Visual Basic程序设计简明教程45算术运算的数据类型如果参加算术运算的操作数具有不同的数据类型，为保证数据运算的精度，VB规定运算结果的数据类型以高类型为准。所谓高类型，是指其所占内存的字节数较多。例如Integer型数据和Double型数据进行运算，则运算结果的数据类型为Double

19、型。2022/7/20Visual Basic程序设计简明教程462.3 运算符与表达式字符串表达式连接运算符（&）用来连接两个字符串，它的优先级低于算术运算符。 加（+）也可以用来连接字符串，例如字符串表达式“Visual ”+“Basic”的值是“Visual Basic”。 2022/7/20Visual Basic程序设计简明教程47字符串连接运算符的比较 左操作数右操作数&+“123”“456”“123456”“123456”“123”456“123456”579123456“123456”579 123“456abc”“123456abc”类型不匹配，出错2022/7/20Visu

20、al Basic程序设计简明教程482.3 运算符与表达式日期表达式（1）两个日期型数据相减，结果是一个数值，表示两个日期之间相差的天数。 （2）一个日期型数据与一个数值相加或者相减，结果是一个日期型数据，表示向后或者向前推算日期。 例如#5/3/2008#-#4/29/2008#的值是4， #5/3/2008#+5的值是#5/8/2008# 。返回2022/7/20Visual Basic程序设计简明教程492.4 语句语句是构成VB程序的最小单位，程序中的语句经过编译之后，生成了若干条机器指令。根据这些指令，计算机系统就能够完成运算操作，或者实现对操作流程的控制。 2022/7/20Vis

21、ual Basic程序设计简明教程502.4 语句书写规则1注释（1）使用单引号（）引导，一般出现在一条语句的后面。 （2）使用Rem引导，必须单独一行。 2续行 续行符（ _）的写法是空格紧跟下划线，它只能出现在一行的末尾。3语句分隔 用冒号（:）把几条语句分隔，然后写在同一行。 2022/7/20Visual Basic程序设计简明教程512.4 语句赋值语句变量|对象.属性=表达式（1）=是赋值运算符，它需要两个操作数，优先级最低。（2）赋值运算符的右操作数通常是算术表达式、字符串表达式和函数调用表达式，左操作数是变量或者对象的属性。（3）执行赋值语句时，首先计算赋值运算符右边的表达式，

22、然后把值赋给左边的变量或者对象的属性。2022/7/20Visual Basic程序设计简明教程52赋值语句的作用 保存数据运算的结果。 v = 4 / 3 * 3.14 * r 3 计算球的体积在程序中修改对象的属性值。Text1.BackColor = vbRed 2022/7/20Visual Basic程序设计简明教程53函数调用表达式 一般形式为：函数名(参数列表) VB语言提供了大量的内部函数，它们能够完成一些预先设定好的功能，诸如计算数学函数值、字符串处理以及类型转换等等。例如： Dim a As Integer a = Val(123abc) 2022/7/20Visual B

23、asic程序设计简明教程542.4 语句流程控制语句流程控制语句并不参与对数据的操作，而是控制程序执行的流程。它可以分为两类：一类是流程结构语句，另一类是流程转向语句。 End语句End语句的功能是立即结束程序的执行。返回2022/7/20Visual Basic程序设计简明教程552.5 窗体 窗体（Form）是VB程序的重要对象，也是所有控件的容器。程序的每一个窗体都是VB工程中的一个模块，并单独保存在一个窗体文件（.frm）中。在程序运行时，每一个窗体对应于一个具有Windows风格的窗口。如右图所示： 2022/7/20Visual Basic程序设计简明教程56 窗体的常用属性 属性

24、作用Name设置窗体的对象名Caption设置窗体的标题AutoRedraw确定是否自动重画被遮住的窗体内容 BorderStyle设置窗体边框的类型BackColor设置窗体的背景颜色ForeColor设置窗体的前景颜色Font设置窗体中显示的文字的字体Height设置窗体的高度Width设置窗体的宽度Top设置窗体距屏幕顶端的距离Left设置窗体距屏幕左端的距离Moveable确定程序运行时窗体能否移动Visible确定程序运行时窗体是否可见WindowState设置窗体在启动时的状态2022/7/20Visual Basic程序设计简明教程57说明： Name是所有控件都具有的属性，其属

25、性值就是控件对象在程序中的对象名。程序第一个窗体的默认对象名是Form1。窗体的高度、宽度以及距离等属性值的单位是Twip，1英寸=1440Twip。 2022/7/20Visual Basic程序设计简明教程58窗体的常用事件 事件来源Click鼠标单击窗体DblClick鼠标双击窗体Load窗体装入工作区 Unload卸载窗体Activate窗体成为活动状态DeActivate窗体成为不活动状态Resize调整窗体的尺寸2022/7/20Visual Basic程序设计简明教程59说明： 装入窗体时会自动触发Load事件，因此可以在窗体的Load事件过程中对控件对象和变量进行初始化。 Ac

26、tivate 事件和DeActivate事件往往发生在拥有多个窗体的VB程序中。 2022/7/20Visual Basic程序设计简明教程60窗体的常用方法 方法功能Print在窗体中输出文本Cls清除窗体中显示的文本和图形Show显示窗体 Hide隐藏窗体Move移动窗体，并可以改变其尺寸2022/7/20Visual Basic程序设计简明教程61说明：方法的调用形式：对象.方法 参数列表Print方法不仅用于窗体，而且也可以用于图片框和打印机等其它对象。 装入窗体并不表示一定会自动显示，需要调用Show方法显示窗体。 Move方法的调用形式： 对象.Move left,top,widt

27、h,height 返回62第3章 顺序结构本章内容： 数据输入 数据输出 标签 文本框 命令按钮 程序举例2022/7/20Visual Basic程序设计简明教程633.1 数据输入VB程序的执行则采用事件驱动机制，由用户或者系统触发某个事件去执行相应的事件过程。尽管事件处理过程之间并无特定的执行顺序，但是每个事件过程的内部却依然包含着顺序、选择和循环三种基本控制结构。 顺序结构是结构化程序设计中最基本的控制结构之一，其语句按照书写的顺序依次逐条执行。 2022/7/20Visual Basic程序设计简明教程643.1 数据输入InputBox函数调用InputBox函数时，系统将弹出一个

28、输入对话框。InputBox函数的格式：InputBox(Prompt,Title,Default,) 说明：（1）InputBox函数返回一个字符串，该字符串就是用户在对话框中输入的数据。（2）参数Prompt是必选项，它是一个字符串，用于提示用户当前应输入哪些数据。（3）Title和Default这两个参数均为可选项，前者作为对话框的标题，后者作为对话框的默认输入内容。（4）如果位于参数列表中间的可选项参数被省略，则必须用逗号标示这些被省略的参数。 2022/7/20Visual Basic程序设计简明教程65举例：Dim name As String, score As Integern

29、ame = InputBox(“请输入学生的姓名”, “姓名输入”) 省略了默认值score = Val(InputBox(请输入学生的成绩, , 80) 省略了标题 2022/7/20Visual Basic程序设计简明教程66 3.1 数据输入文本框控件 用户可以在文本框控件中输入数据，然后在程序中通过赋值语句把它赋给某个变量。一般形式： 变量=文本框对象.text举例：Dim name As String, score As Integer name = Text1.text 输入学生的姓名 score = Val(Text2.text) 输入学生的成绩返回2022/7/20Visual

30、 Basic程序设计简明教程673.2 数据输出标签控件一般形式：标签对象.caption=表达式 Label1.caption = name 输出学生的姓名Label2.caption = Str(score) 输出学生的成绩。 3.2 数据输出文本框控件一般形式：文本框对象.text=表达式 Text1.text = name 输出学生的姓名 Text2.text = Str(score) 输出学生的成绩文本框控件既可以用于输入数据，也可以用于输出数据，这取决于控件对象是作为赋值运算符的左操作数还是右操作数。2022/7/20Visual Basic程序设计简明教程683.2 数据输出 M

31、sgBox函数l调用MsgBox函数时，系统将弹出一个消息对话框，该对话框能够显示一些提示性的信息，并接收用户做出的选择。MsgBox函数的格式： MsgBox(Prompt,Buttons,Title,) 2022/7/20Visual Basic程序设计简明教程69说明：（1）参数Prompt是必选项，它是一个字符串，可以作为输出的数据。 （2）参数Buttons和参数Title均为可选项，前者是一个整型表达式，确定了消息对话框的类型；后者作为对话框的标题。Buttons的默认值是vbOKOnly，实际设置时可以由4个分组值相加而成。例如弹出一个采用应用模式的消息对话框，显示“终止”、“重

32、试”和“忽略”按钮，图标为严重错误信息，默认是第一个按钮，Buttons的值可以写为2+16+0+0，也可以直接写为18。（3）MsgBox函数返回一个整数，该整数代表用户在对话框中选中的按钮。如果在函数调用时只给出第一个参数（Prompt）的值，就不必使用赋值语句；如果明确给出了其它参数的值，则必须用赋值语句把函数的返回值予以保存。 2022/7/20Visual Basic程序设计简明教程70举例：Dim name As String, score As Integername = 宋开莉score = 80MsgBox (学生姓名： & name & vbCr & 学生成绩： & sco

33、re) 2022/7/20Visual Basic程序设计简明教程713.2 数据输出 Print方法Print的功能是在对象上输出信息，其中对象可以是窗体、图片框、立即窗口和打印机。Print方法的格式： 对象.Print 表达式列表;|,2022/7/20Visual Basic程序设计简明教程72说明：（1）调用Print方法时如果未给出对象名，则默认对象是窗体。 （2）表达式列表是可选项，如果省略则输出一个空行。Print输出信息之后通常将会自动换行，如果语句末尾有分号（;）或者逗号（,），则表示不换行。（3）表达式列表中可以有多个表达式，表达式之间用空格、分号或者逗号分隔，其中空格和

34、分号的效果相同。如果是数值表达式，就输出它的值；如果是字符串，则原样输出。（4）如果用分号（;）分隔表达式，按照紧凑格式输出数据；如果用逗号（,）分隔表达式，按照标准格式输出数据，此时当前数据项在下一个输出区中显示。 2022/7/20Visual Basic程序设计简明教程73举例： Dim name As String, score As Integer name = 宋开莉 score = 80 Print 学生姓名：; 不换行 Print name Print 学生成绩：; score 2022/7/20Visual Basic程序设计简明教程74相关函数： 1Spc函数 Spc函数的

35、功能是在当前输出位置插入指定数量的空格， 其格式是：Spc(n)2Tab函数 Tab函数的功能是将当前输出位置定位至指定的地方， 其格式是：Tab(n) Dim name As String, score As Integer name = 宋开莉 score = 80 Print 学生姓名：; Print Spc(5); name Print 学生成绩：; Tab(15); score 2022/7/20Visual Basic程序设计简明教程75相关函数：3.Format函数Format函数一般用于Print方法中，可以使得数值、字符串或者日期按指定的格式输出。Format函数的格式： F

36、ormat(表达式,格式字符串)Print Format(3.14159, 00.000) 输出结果为03.142Print Format(3.14159, #.#E+#) 输出结果为31.416E-1返回2022/7/20Visual Basic程序设计简明教程763.3 标签 标签（Label）控件能够显示一些用户无法直接更改的文本信息，它通常作为一种辅助性的控件，用来标注那些自身不具备Caption属性的控件。在工具箱中表示为：标签的常用属性 属性作用Name设置标签的对象名Caption设置标签所显示的文本信息Alignment设置标签上文本的对齐方式 BackStyle确定标签的背景

37、是否透明，默认值是1，表示不透明BorderStyle设置标签的边框类型，默认值是0，表示无边框AutoSize确定是否根据标签上文本的长度自动调整标签自身的尺寸，默认值是FalseWordWrap确定是否根据标签上文本的长度自动换行，默认值是False2022/7/20Visual Basic程序设计简明教程77说明： （1）程序第一个标签控件的默认对象名是Label1，依次类推。（2）Caption是标签控件最重要的属性之一，其属性值是一个字符串，即显示的文本，最多允许有1024个字符。 返回2022/7/20Visual Basic程序设计简明教程783.4 文本框文本框（TextBox

38、）控件是一种常用的标准控件，兼备数据输入和输出的功能，还提供了插入、选择以及复制等文本编辑手段。在工具箱中表示为：文本框的常用属性 属性作用Name设置文本框的对象名Text设置文本框所显示的文本信息MaxLength设置文本框所显示的文本信息的最大长度，默认值是0，表示长度不受限制MultiLine确定文本框能否输入多行文本，默认值是False，表示只允许输入单行文本ScrollBars确定文本框能否有滚动条PasswordChar设置密码符号，默认值是空串SelText确定当前所选的文本SelStart确定所选文本的开始位置，如果未选中文本，则为插入点的位置SelLength确定所选文本的

39、长度2022/7/20Visual Basic程序设计简明教程79说明： （1）程序第一个文本框控件的默认对象名是Text1，依次类推。（2）Text是文本框控件最重要的属性之一，其属性值是一个字符串，即显示的文本。只允许输入单行文本时，最多可以有2048个字符；如果允许输入多行文本，则最多可以有32K个字符。2022/7/20Visual Basic程序设计简明教程80文本框的常用事件 ：事件来源Change文本框的Text属性值发生改变GotFocus文本框获得焦点LostFocus文本框失去焦点KeyPress用户按下并且释放键盘上的一个键2022/7/20Visual Basic程序设

40、计简明教程81说明： （1）当用户在文本框中输入新内容，或者程序运行时修改了Text属性值，都会自动触发Change事件。（2）只有对象的Enabled和Visible的属性值是True时，它才有获得焦点的能力。在程序运行时，用户可以通过鼠标单击或者按Tab键切换，使某个控件获得焦点。（3）当用户按下并且释放键盘上的一个键，将会触发焦点所在控件的KeyPress事件。该事件返回所输入字符的Unicode码，在程序中加以判断，就会识别出用户刚才按下了哪个键。2022/7/20Visual Basic程序设计简明教程82例3.1：在文本框中输入密码，然后单击窗体，在标签中显示该密码。完成步骤：新建

41、一个工程，在窗体上分别创建2个标签、1个文本框和1个命令按钮。在属性窗口中对窗体和控件的属性进行设置。文本框的PasswordChar属性值设置为“*”，表示输入的字符都显示为“*”；标签Label2的BorderStyle属性值设置为1，表示该标签有边框。 2022/7/20Visual Basic程序设计简明教程83Private Sub Form_Click()Label2.Caption = 您输入的密码是： + Text1.TextEnd SubPrivate Sub Command1_Click()EndEnd Sub 代码及实现结果：返回2022/7/20Visual Basic

42、程序设计简明教程843.5 命令按钮命令按钮（CommandButton）控件通常用来接受用户的操作命令，一般通过单击命令按钮来触发事件过程，执行指定的操作，从而实现特定的功能。在工具箱中表示为：命令按钮的常用属性 属性作用Name设置命令按钮的对象名Caption设置命令按钮的标题Default确定命令按钮是否为Enter键的默认按钮Cancel确定命令按钮是否为Esc键的默认按钮Enabled确定命令按钮是否有效，默认值是True，表示有效Visible确定命令按钮是否可见，默认值是True，表示可见Style设置命令按钮的外观，默认值是0，表示只能显示文字Picture设置命令按钮上显示

43、的图片文件2022/7/20Visual Basic程序设计简明教程85说明： （1）程序第一个命令按钮控件的默认对象名是Command1，依次类推。（2）设置Caption属性时，在标题的某个字母前插入一个连接符（&），即可为命令按钮设置快捷键。（3）当某个命令按钮的Default属性值为True时，按下Enter键就相当于用鼠标单击了该按钮；当某个命令按钮的Cancel属性值为True时，按下Esc键就相当于用鼠标单击了该按钮。（4）当某个命令按钮的Enabled属性值是False时，它就会失效并呈灰色，此时既不能接受用户的操作命令，也不能响应事件。当某个命令按钮的Visible属性值是F

44、alse时，它在程序运行时将不会显示在窗体中。（5）当Style属性值是1时，表示在命令按钮上可以显示图形。此时即可在Picture属性中选择图片文件，程序运行时该命令按钮就会成为图形按钮。 返回2022/7/20Visual Basic程序设计简明教程863.6 程序举例例3.2：输入3位学生的成 绩，求其平均值。新建一个工程，在窗体上分别创建1个标签、1个文本框和2个命令按钮，并设置属性值。 代码：Private Sub Command1_Click()Dim num1 As Integer, num2 As Integer, num3 As Integer, aver As Single

45、num1 = Val(InputBox(请输入第1位学生的成绩)num2 = Val(InputBox(请输入第2位学生的成绩)num3 = Val(InputBox(请输入第3位学生的成绩)aver = (num1 + num2 + num3) / 3Text1.Text = averEnd SubPrivate Sub Command2_Click()EndEnd Sub 2022/7/20Visual Basic程序设计简明教程87例3.4 ：1、交换两个整型变量的值。 2、在窗体上分别创建3个标签、2个文本框和3个命令按钮，并设置属性值。 Private Sub Command1_Cl

46、ick()Dim a%, b%, t As Integera = Val(Text1.Text)b = Val(Text2.Text)t = aa = bb = tLabel3.Caption = 交换后Text1.Text = aText2.Text = bEnd SubPrivate Sub Command2_Click()Label3.Caption = 交换前Text1.Text = Text2.Text = End SubPrivate Sub Command3_Click()EndEnd Sub返回2022/7/2088第4章 选择结构本章内容： 关系表达式 逻辑表达式 If语句

47、Select Case语句 框架 单选按钮 复选框2022/7/20Visual Basic程序设计简明教程894.1 关系表达式在程序中经常需要描述数据之间的关系并进行判断，从而决定下一步应执行什么动作。 关系运算符可以用来构建关系表达式，以描述和比较两个数据之间的大小关系。 2022/7/20Visual Basic程序设计简明教程904.1.1 关系运算符VB语言提供了6个常用的关系运算符：、=、=、=和（不等于），它们都是双目运算符，优先级彼此相同。关系运算的结果显然是逻辑值，即关系成立为True，否则为False。 2022/7/20Visual Basic程序设计简明教程91说明

48、：（1）关系运算符的操作数可以是数值、字符串或者日期型数据。一般要求两边的操作数类型一致。（2）两个字符串按词典序进行比较，即都从各自的第一个字符开始，相应位置的字符依次按Unicode码比较大小，直到出现不同的字符或者字符串结束为止。VB语言规定逻辑值转换为数值时，-1代表True，0代表False。 2022/7/20Visual Basic程序设计简明教程92 4.1.2 关系表达式用关系运算符连接起来进行关系运算的式子，称为关系表达式。如： Dim a%, b%, c% a=7: b=6: c=5 a*2=b+c abc 2=2=22022/7/20Visual Basic程序设计简明

49、教程934.2 逻辑表达式关系表达式可以用来构造一些简单的条件，但是还不足以构造复杂的条件。这些条件是由一些子条件复合而成的，表达了一种逻辑关系，无法用关系表达式完成，需要用逻辑表达式构造。例如不仅任意两边之和大于第三边，而且其中的两边相等，才能构成等腰三角形。 2022/7/20Visual Basic程序设计简明教程944.2.1 逻辑运算符VB语言提供了3个常用的逻辑运算符：Not、And和Or，分别表示逻辑非、逻辑与和逻辑或运算。逻辑运算的结果当然为逻辑值：True（真）或者False（假）。Not是单目运算符，其余两种是双目运算符。 Not的优先级最高，其次是And，最低为Or。 2

50、022/7/20Visual Basic程序设计简明教程95逻辑运算规则表： ABA And BA Or BNot ATrueTrueTrueTrueFalse TrueFalseFalseTrueFalseTrueFalseTrueTrue FalseFalseFalseFalse2022/7/20Visual Basic程序设计简明教程964.2.2 逻辑表达式l用逻辑运算符将表达式连接起来的式子称为逻辑表达式。例如： Dim a%, b%, c% a=7: b=6: c=5 a=b And b = = = NotAndOr=(赋值)运算符：2022/7/20Visual Basic程序设

51、计简明教程98计算表达式的结果： 3 Mod 5=3 And 132 Or Not 21，值为False。5）然后计算True And False，值为False。6）计算221这种数学常识。 32 And 21 （2）描述字符串变量c的值是小写字母。 c=“a” And c= A And s= a And sb Thent=aa=bb=tEnd IfPrint a;bEnd Sub 2022/7/20Visual Basic程序设计简明教程1054.3 If语句ElseIf结构 If 表达式1 Then 语句块1 ElseIf 表达式2 Then 语句块2 ElseIf 表达式n Then

52、语句块n Else 语句块n+1 End If 是语句块n+1是否表达式1为真语句块1否表达式n为真语句块n是否表达式2为真语句块22022/7/20Visual Basic程序设计简明教程106说明： 判断某个条件时存在一个前提，即前面的所有条件都不成立。尽管ElseIf结构有多个分支，但是仍然只有一个分支的语句块会被执行。这种结构特别适合处理有多个互相排斥的条件存在的情况，例如计算分段函数的值。 2022/7/20Visual Basic程序设计简明教程107例4.3 计算分段函数的值 Private Sub Command3_Click()Dim x As Single, y!x=Val

53、(InputBox(请输入x的值)If x2 Then 判断x是否小于2 y=2*x+1ElseIf x8 Then 判断x是否在2和8之间 y=x-3Else 前面两个条件都不满足 y=3*x-1End IfPrint y=;yEnd Sub2022/7/20Visual Basic程序设计简明教程1084.3 If语句If语句的嵌套If 表达式1 Then If 表达式1_1 Then 语句块1_1 Else 语句块1_2 End IfElse If 表达式2_1 Then 语句块2_1 Else 语句块2_2 End If End If是否是否是表达式1_1为真语句块1_1语句块1_2语

54、句块2_1表达式2_1为真语句块2_2否表达式1为真2022/7/20Visual Basic程序设计简明教程109例4.4 用If语句的嵌套实现例4.3 。Private Sub Command4_Click()Dim x As Single, y!x=Val(InputBox(请输入x的值)If x8 Then 判断x是否小于8If xb,a,b) 2022/7/20Visual Basic程序设计简明教程1114.4 Select Case语句 Select Case 表达式 Case 表达式列表1 语句块1 Case 表达式列表2 语句块2 Case 表达式列表n 语句块n Case

55、Else 语句块n+1 End Select 先计算表达式的值，然后与n个Case右边的表达式列表逐一比较。如果和其中某个表达式列表的值相等或者匹配，则执行该Case后面的语句块；如果与所有的Case表达式列表均不匹配，则执行Case Else后面的语句块。 执行流程2022/7/20Visual Basic程序设计简明教程112作息时间表的实现 Select Case t t为输入的查询时间 Case 7,14 MsgBox (起床) Case 7.5 To 8,12 To 12.5,17.5 To 18 MsgBox (用餐) Case 8.5 To 11.5,14.5 To 17 Msg

56、Box (上课) Case 19 To 21 MsgBox (自习) Case 0 To 7,13 To 14,Is =22 MsgBox (睡觉) Case Else MsgBox (自由活动) End Select Private Sub Command5_Click() Dim x As Single, y! x = Val(InputBox(请输入x的值) Select Case x Case Is 2 x小于2 y = 2 * x + 1 Case Is 8 x在2和8之间 y = x - 3 Case Else x8 y = 3 * x - 1 End Select Print y

57、=; y End Sub例4.5 用Select Case语句实现例4.32022/7/20Visual Basic程序设计简明教程1134.5 框架 框架（Frame）控件是一种容器型控件，用于将窗体中的控件分组。在工具箱中表示为：框架的常用属性 属性作用Name设置框架的对象名Caption设置框架所显示的文本信息Enabled确定框架是否有效Visible确定框架是否可见2022/7/20Visual Basic程序设计简明教程114说明： 程序第一个框架控件的默认对象名是Frame1，依次类推。Caption属性设定了框架的标题，如果属性值为空串，则框架控件在外观上与一个封闭的矩形框类

58、似。当Enabled的属性值是False时，不仅框架失效，而且框架内的所有控件也都会失效。当Visible的属性值是False时，则框架连同其中的所有控件都将被隐藏。2022/7/20Visual Basic程序设计简明教程1154.6 单选按钮单选按钮（OptionButton）控件具有选择功能，在程序界面中必须成组出现。在工具箱中表示为：属性作用Name设置单选按钮的对象名Caption设置单选按钮的标题Alignment设置单选按钮标题的位置，默认值是0，表示单选按钮在左边，标题在右边Value设置单选按钮的状态，默认值是FalseStyle设置单选按钮的外观，默认值是0，表示标准方式P

59、icture设置在单选按钮上显示的图片文件单选按钮的常用属性 2022/7/20Visual Basic程序设计简明教程116说明： 程序第一个单选按钮控件的默认对象名是Option1，依次类推。Value是单选按钮控件最重要的属性，其属性值有2个，True和False。True表示单选按钮被选中，而False表示未被选中。如果某一个单选按钮的Value属性值是True，必然意味着同组中其它单选按钮的Value属性值是False。Style的属性值有2个，0和1。1表示图形方式，此时单选按钮的外观类似于命令按钮。如果单选按钮未被选中，就会显示由Picture属性指定的图片文件；如果单选按钮被选

60、中，则会显示由DownPicture属性指定的图片文件。2022/7/20Visual Basic程序设计简明教程1174.7 复选框复选框（CheckBox）控件也具有选择功能，一般在程序界面中成组出现，用户在一组复选框中一次可以选择多个。在工具箱中表示为：复选框的常用属性 属性作用Name设置复选框的对象名Caption设置复选框的标题Alignment设置复选框标题的位置，默认值是0，表示复选框在左边，标题在右边Value设置复选框的状态，默认值是0Style设置复选框的外观，默认值是0，表示标准方式Picture设置在复选框上显示的图片文件2022/7/20Visual Basic程序