程序设计简明课件完整版课件全套ppt整套电子教案最全电子讲义（最新）

1、Visual BasicVisual Basic程序设计程序设计 2021/7/16Visual Basic程序设计简明教程1 第第1 1章章 概述概述 2021/7/16Visual Basic程序设计简明教程2 1.1 程序设计语言 关于程序关于程序： l程序：是一组有序指令的集合，由某种程程序：是一组有序指令的集合，由某种程 序设计语言编写而成。序设计语言编写而成。 l程序设计语言：是人与计算机之间进行交程序设计语言：是人与计算机之间进行交 流的工具。流的工具。 DATE yyyy/M/d|2021/3/31 Visual Basic程序设计简明教 程3 1.1 程序设计语言 面向机器的

2、程序设计语言面向机器的程序设计语言 l机器语言机器语言是计算机能够直接执行的二进制指令是计算机能够直接执行的二进制指令 代码，每条指令都用代码，每条指令都用0 0和和1 1组成的序列串表示，组成的序列串表示， 这些指令的集合就是指令系统。这些指令的集合就是指令系统。 l汇编语言汇编语言主要由汇编指令构成，这些汇编指令主要由汇编指令构成，这些汇编指令 与机器语言的二进制指令一一对应。与机器语言的二进制指令一一对应。 机器语言和汇编语言都是面向机器的程序设计语言，机器语言和汇编语言都是面向机器的程序设计语言， 它们与计算机的硬件紧密相关。它们与计算机的硬件紧密相关。 DATE yyyy/M/d|2

3、021/3/31 Visual Basic程序设计简明教 程4 1.1 程序设计语言 面向过程的程序设计语言面向过程的程序设计语言 lFORTRAN语言和随后出现的语言和随后出现的BASIC语言、语言、 Pascal语言、语言、COBOL语言以及语言以及C语言等等，语言等等， 都被称为高级语言。都被称为高级语言。 l程序员在使用高级语言编写程序时，不需要熟程序员在使用高级语言编写程序时，不需要熟 悉计算机的指令系统，可以将精力集中于解题悉计算机的指令系统，可以将精力集中于解题 思路和方法上。思路和方法上。 l计算机不能直接执行高级语言程序，必须先翻计算机不能直接执行高级语言程序，必须先翻 译成

4、为机器语言程序之后才能执行。译成为机器语言程序之后才能执行。 DATE yyyy/M/d|2021/3/31 Visual Basic程序设计简明教 程5 1.1 程序设计语言 面向对象的程序设计语言面向对象的程序设计语言 l面向对象的程序设计方法力求符合人们自然的思面向对象的程序设计方法力求符合人们自然的思 维习惯，运用类和对象的观点描述问题域，然后维习惯，运用类和对象的观点描述问题域，然后 用程序设计语言对问题进行描述和实现。用程序设计语言对问题进行描述和实现。 l面向对象的程序设计语言大致可以分为两类，一面向对象的程序设计语言大致可以分为两类，一 类是纯面向对象语言，例如类是纯面向对象语

5、言，例如Eiffel语言和语言和Java语语 言；另一类是混合型面向对象语言，它们往往是言；另一类是混合型面向对象语言，它们往往是 由面向过程的语言发展而来的，例如由面向过程的语言发展而来的，例如C+语言和语言和 Visual Basic语言。语言。 DATE yyyy/M/d|2021/3/31 Visual Basic程序设计简明教 程6 1.2 VB语言的特点 VBVB语言的发展概况：语言的发展概况： lVisual BasicVisual Basic语言（简称语言（简称VBVB）是微软公司推出的基于）是微软公司推出的基于 WindowsWindows环境的应用软件开发工具，其语法基础是

6、环境的应用软件开发工具，其语法基础是 BasicBasic语言。语言。 l微软公司于微软公司于19911991年推出年推出VB 1.0VB 1.0版，历经数年的更新换版，历经数年的更新换 代，代，19981998年升级为年升级为VB 6.0VB 6.0版，并有学习版、专业版和版，并有学习版、专业版和 企业版等企业版等3 3种版本。种版本。 DATE yyyy/M/d|2021/3/31 Visual Basic程序设计简明教 程7 VBVB语言的特点语言的特点 l可视化的程序设计方法可视化的程序设计方法 l结构化的程序设计语言结构化的程序设计语言 l事件驱动的编程机制事件驱动的编程机制 l数据

7、库访问数据库访问 l良好的可扩充性良好的可扩充性 DATE yyyy/M/d|2021/3/31 Visual Basic程序设计简明教 程8 1.3 VB程序的开发环境 lVB6.0VB6.0的启动：的启动：在在“开始开始”菜单中的菜单中的“程序程序” 菜单项中，选择菜单项中，选择“Microsoft Visual Studio Microsoft Visual Studio 6.0”6.0”级联菜单中的级联菜单中的“Microsoft Visual Microsoft Visual Basic 6.0”Basic 6.0”命令，即可启动命令，即可启动VB 6.0VB 6.0。 l首先弹出首

8、先弹出“新建工程新建工程”对话框，其中列出了对话框，其中列出了VB VB 6.06.0能够创建的工程类型。系统默认的工程类能够创建的工程类型。系统默认的工程类 型是型是“标准标准EXE”EXE”。 DATE yyyy/M/d|2021/3/31 Visual Basic程序设计简明教 程9 Visual Basic 6.0 Visual Basic 6.0项目类型项目类型 （1）标准）标准EXE项目项目 （2）ActiveX DLL项目项目 （3）ActiveX EXE项目项目 （4）ActiveX 控件项目控件项目 （5）ActiveX 文档项目文档项目 （6）DHTML 应用程序项目应用程

9、序项目 （7）IIS 应用程序项目应用程序项目 DATE yyyy/M/d|2021/3/31 Visual Basic程序设计简明教 程 1 0 新建工程：新建工程： 图1-1 “新 建工 程” 对话 框 DATE yyyy/M/d|2021/3/31 Visual Basic程序设计简明教 程 1 1 Visual Basic 6.0 Visual Basic 6.0 集成开发环境集成开发环境 图图1-2 Visual Basic 6.01-2 Visual Basic 6.0集成开发环境集成开发环境 DATE yyyy/M/d|2021/3/31 Visual Basic程序设计简明教

10、程 1 2 菜单组成：菜单组成： l“文件文件”菜单菜单 l“编辑编辑”菜单菜单 l“视图视图”菜单菜单 l“工程工程”菜单菜单 l“格式格式”菜单菜单 l“调试调试”菜单菜单 l“运行运行”菜单菜单 l“工具工具”菜单菜单 l“外接程序外接程序”菜单菜单 “文件”菜单： （1）新建工程 （2）打开工程 （3）添加工程 （4）移除工程 （5）保存工程 （6）工程另存为 （7）保存文件 （8）文件另存为 （9）生成工程 DATE yyyy/M/d|2021/3/31 Visual Basic程序设计简明教 程 1 3 图1-3 “文件”菜单 文件菜单 “编辑编辑”菜单：菜单：“编辑编辑”菜单用于

11、菜单用于 编辑操作，以方便对工程进行修改。编辑操作，以方便对工程进行修改。 图1-4 “编辑”菜单 DATE yyyy/M/d|2021/3/31 Visual Basic程序设计简明教 程 1 4 “视图视图”菜单菜单 l“视图 视图”菜单用于显示各种窗口菜单用于显示各种窗口 图1-5 视图菜单栏 “工程工程”菜单菜单 “工程 工程”菜单用于为当前工程创建菜单用于为当前工程创建 模块、引用对象或提供各种设计器。模块、引用对象或提供各种设计器。 图1-6 工程菜单栏 DATE yyyy/M/d|2021/3/31 Visual Basic程序设计简明教 程 1 5 “格式格式”菜单菜单 “格式

12、 格式”菜单用于界面设计，可以使得界面中的控菜单用于界面设计，可以使得界面中的控 件按照一定的规则有序排列。件按照一定的规则有序排列。 图图1-7 1-7 格式菜单栏格式菜单栏 “调试”菜单 “调试 调试”菜单用于调试、监视程序。菜单用于调试、监视程序。 图图1-8 1-8 调试菜单栏调试菜单栏 DATE yyyy/M/d|2021/3/31 Visual Basic程序设计简明教 程 1 6 “运行运行”菜单菜单 l“运行运行”菜单用于执行程菜单用于执行程 序。序。 图图1-9 1-9 运行菜单栏运行菜单栏 “工具”菜单 图图1-10 1-10 工具菜单栏工具菜单栏 DATE yyyy/M/

13、d|2021/3/31 Visual Basic程序设计简明教 程 1 7 “外接程序外接程序”菜单菜单 图图1-11 1-11 外接程序菜单栏外接程序菜单栏 工具栏： 图图1-12 1-12 选取工具栏选取工具栏 DATE yyyy/M/d|2021/3/31 Visual Basic程序设计简明教 程 1 8 表表1-1 1-1 标准工具栏上的图标按钮标准工具栏上的图标按钮 DATE yyyy/M/d|2021/3/31 Visual Basic程序设计简明教 程 1 9 续表续表1-1 1-1 标准工具栏上的图标按钮标准工具栏上的图标按钮 DATE yyyy/M/d|2021/3/31

14、Visual Basic程序设计简明教 程 2 0 1.4 1.4 简单的简单的VBVB程序介绍程序介绍 建立建立VB应用程序的方法：应用程序的方法： l创建一个工程创建一个工程 l为窗体添加对象为窗体添加对象 l设置对象属性设置对象属性 l编写代码编写代码 l运行工程运行工程 l调试工程调试工程 l保存工程保存工程 DATE yyyy/M/d|2021/3/31 Visual Basic程序设计简明教 程 2 1 控件的画法：控件的画法： DATE yyyy/M/d|2021/3/31 Visual Basic程序设计简明教 程 2 2 程序的执行：程序的执行： l编译运行编译运行 l解释运

15、行解释运行 lVB的三种工作模式的三种工作模式:设计、运行、和中断。设计、运行、和中断。 l生成可执行文件生成可执行文件(EXE)，可以在，可以在Windows 环境下直接运行。环境下直接运行。 DATE yyyy/M/d|2021/3/31 Visual Basic程序设计简明教 程 2 3 可视化程序设计的概念： 对象（对象（ObjectObject） 对象的属性（对象的属性（PropertyProperty） 对象的方法（对象的方法（MethodMethod） 对象事件（对象事件（EventEvent） 事件过程事件过程 DATE yyyy/M/d|2021/3/31 Visual Ba

16、sic程序设计简明教 程 2 4 对象：对象： DATE yyyy/M/d|2021/3/31 Visual Basic程序设计简明教 程 2 5 事件：事件： DATE yyyy/M/d|2021/3/31 Visual Basic程序设计简明教 程 2 6 事件过程：事件过程： DATE yyyy/M/d|2021/3/31 Visual Basic程序设计简明教 程 2 7 第第2 2章章 VBVB语言基础语言基础 DATE yyyy/M/d|2021/3/ 31Visual BasicVisual Basic程序设计简明教程程序设计简明教程28 2.1 2.1 数据类型数据类型 l计算

17、机中的数据是现实世界中信息的具体计算机中的数据是现实世界中信息的具体 表现形式，它有一定的数据类型，数据类型表现形式，它有一定的数据类型，数据类型 确定了数据的取值范围和能够进行的操作。确定了数据的取值范围和能够进行的操作。 l在计算机的存储器中，不同类型的数据所在计算机的存储器中，不同类型的数据所 占存储空间的长度也有所不同。占存储空间的长度也有所不同。 DATE yyyy/M/d|2021/3/31Visual BasicVisual Basic程序设计简明教程程序设计简明教程29 VB VB 语言的数据类型语言的数据类型 DATE yyyy/M/d|2021/3/31Visual Bas

18、icVisual Basic程序设计简明教程程序设计简明教程30 标识符标识符 （1 1）关键字）关键字 关键字又称保留字，是关键字又称保留字，是VBVB语言预先规定的具有语言预先规定的具有 固定含义的一些单词。固定含义的一些单词。 （2 2）标识符）标识符 标识符的命名规则是，以字母开始，由字母、标识符的命名规则是，以字母开始，由字母、 下划线和数字组成。下划线和数字组成。 标识符不能与关键字同名。标识符不能与关键字同名。 在标识符中并不区分字母的大小写。在标识符中并不区分字母的大小写。 DATE yyyy/M/d|2021/3/31Visual BasicVisual Basic程序设计简

19、明教程程序设计简明教程31 2.2 2.2 常量与变量常量与变量 常量是指在程序执行期间其值不发生变化常量是指在程序执行期间其值不发生变化 的量，变量的字面含义是指在程序执行期间其的量，变量的字面含义是指在程序执行期间其 值可以变化的量，实际上对应了内存的一段存值可以变化的量，实际上对应了内存的一段存 储空间。储空间。 常量有不同的数据类型，它可以分为直接常量有不同的数据类型，它可以分为直接 常量和符号常量。常量和符号常量。 DATE yyyy/M/d|2021/3/31Visual BasicVisual Basic程序设计简明教程程序设计简明教程32 2.2.1 2.2.1 常量常量整型常

20、量整型常量 （1）十进制整数。）十进制整数。 （2）八进制整数，以）八进制整数，以|, DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程71 说明：说明： （1）调用）调用Print方法时如果未给出对象名，则默认对象是窗体。方法时如果未给出对象名，则默认对象是窗体。 （2）表达式列表是可选项，如果省略则输出一个空行。）表达式列表是可选项，如果省略则输出一个空行。Print输出信输出信 息之后通常将会自动换行，如果语句末尾有分号（息之后通常将会自动换行，如果语句末尾有分号（;）或者逗号（）或者逗号（,），则），则 表示不换行。表示不换行。 （3）表达式列表中

21、可以有多个表达式，表达式之间用空格、分号或者）表达式列表中可以有多个表达式，表达式之间用空格、分号或者 逗号分隔，其中空格和分号的效果相同。如果是数值表达式，就输出它的逗号分隔，其中空格和分号的效果相同。如果是数值表达式，就输出它的 值；如果是字符串，则原样输出。值；如果是字符串，则原样输出。 （4）如果用分号（）如果用分号（;）分隔表达式，按照紧凑格式输出数据；如果用）分隔表达式，按照紧凑格式输出数据；如果用 逗号（逗号（,）分隔表达式，按照标准格式输出数据，此时当前数据项在下一）分隔表达式，按照标准格式输出数据，此时当前数据项在下一 个输出区中显示。个输出区中显示。 DATE yyyy/M

22、/d|2021/3/31Visual Basic程序设计简明教程72 举例：举例： Dim name As String, score As Integer name = 宋开莉宋开莉 score = 80 Print 学生姓名：学生姓名：; 不换行不换行 Print name Print 学生成绩：学生成绩：; score DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程73 相关函数：相关函数： 1Spc函数函数 Spc函数的功能是在当前输出位置插入指定数量的空格，函数的功能是在当前输出位置插入指定数量的空格， 其格式是：其格式是：Spc(n) 2Ta

23、b函数函数 Tab函数的功能是将当前输出位置定位至指定的地方，函数的功能是将当前输出位置定位至指定的地方， 其格式是：其格式是：Tab(n) Dim name As String, score As Integer name = 宋开莉宋开莉 score = 80 Print 学生姓名：学生姓名：; Print Spc(5); name Print 学生成绩：学生成绩：; Tab(15); score DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程74 相关函数：相关函数： 3.Format函数函数 lFormat函数一般用于函数一般用于Print方法中

24、，可以使得方法中，可以使得 数值、字符串或者日期按指定的格式输出。数值、字符串或者日期按指定的格式输出。 lFormat函数的格式：函数的格式： Format(表达式表达式,格式字符串格式字符串) Print Format(3.14159, 00.000) 输出结果为输出结果为 03.142 Print Format(3.14159, #.#E+#) 输出结输出结 果为果为31.416E-1 DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程75 3.3 3.3 标签标签 标签（标签（LabelLabel）控件能够显示一些用户无法）控件能够显示一些用户无法

25、直接更改的文本信息，它通常作为一种辅助性直接更改的文本信息，它通常作为一种辅助性 的控件，用来标注那些自身不具备的控件，用来标注那些自身不具备CaptionCaption属属 性的控件。在工具箱中表示为：性的控件。在工具箱中表示为： 属性属性作用作用 Name设置标签的对象名设置标签的对象名 Caption设置标签所显示的文本信息设置标签所显示的文本信息 Alignment设置标签上文本的对齐方式设置标签上文本的对齐方式 BackStyle确定标签的背景是否透明，默认值是确定标签的背景是否透明，默认值是1，表示不透明，表示不透明 BorderStyl e 设置标签的边框类型，默认值是设置标签的

26、边框类型，默认值是0，表示无边框，表示无边框 AutoSize确定是否根据标签上文本的长度自动调整标签自身的尺寸，确定是否根据标签上文本的长度自动调整标签自身的尺寸， 默认值是默认值是False WordWrap确定是否根据标签上文本的长度自动换行，默认值是确定是否根据标签上文本的长度自动换行，默认值是FalseDATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程76 说明：说明： （1）程序第一个标签控件的默认对象名是）程序第一个标签控件的默认对象名是 Label1，依次类推。，依次类推。 （2）Caption是标签控件最重要的属性之是标签控件最重要的属性之

27、 一，其属性值是一个字符串，即显示的文本，一，其属性值是一个字符串，即显示的文本， 最多允许有最多允许有1024个字符。个字符。 DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程77 3.4 3.4 文本框文本框 文本框（文本框（TextBox）控件是一种常用的）控件是一种常用的 标准控件，兼备数据输入和输出的功能，标准控件，兼备数据输入和输出的功能， 还提供了插入、选择以及复制等文本编辑还提供了插入、选择以及复制等文本编辑 手段。手段。在工具箱中表示为：在工具箱中表示为： 文本框的常用属性 属性属性作用作用 Name设置文本框的对象名设置文本框的对象名

28、Text设置文本框所显示的文本信息设置文本框所显示的文本信息 MaxLength设置文本框所显示的文本信息的最大长度，默认值是设置文本框所显示的文本信息的最大长度，默认值是0，表示长度，表示长度 不受限制不受限制 MultiLine确定文本框能否输入多行文本，默认值是确定文本框能否输入多行文本，默认值是False，表示只允许输入，表示只允许输入 单行文本单行文本 ScrollBars确定文本框能否有滚动条确定文本框能否有滚动条 PasswordCha r 设置密码符号，默认值是空串设置密码符号，默认值是空串 SelText确定当前所选的文本确定当前所选的文本 SelStart确定所选文本的开始

29、位置，如果未选中文本，则为插入点的位置确定所选文本的开始位置，如果未选中文本，则为插入点的位置 SelLength确定所选文本的长度确定所选文本的长度 DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程78 说明：说明： （1 1）程序第一个文本框控件的默认对象名是）程序第一个文本框控件的默认对象名是Text1Text1， 依次类推。依次类推。 （2 2）TextText是文本框控件最重要的属性之一，其属性值是文本框控件最重要的属性之一，其属性值 是一个字符串，即显示的文本。只允许输入单行文本时，是一个字符串，即显示的文本。只允许输入单行文本时， 最多可以有

30、最多可以有20482048个字符；如果允许输入多行文本，则最个字符；如果允许输入多行文本，则最 多可以有多可以有32K32K个字符。个字符。 DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程79 文本框的常用事件文本框的常用事件 ： 事件事件来源来源 Change文本框的文本框的Text属性值发生改变属性值发生改变 GotFocus文本框获得焦点文本框获得焦点 LostFocus文本框失去焦点文本框失去焦点 KeyPress用户按下并且释放键盘上的一个键用户按下并且释放键盘上的一个键 DATE yyyy/M/d|2021/3/31Visual Basic程

31、序设计简明教程80 说明：说明： （1 1）当用户在文本框中输入新内容，或者程序运行时修）当用户在文本框中输入新内容，或者程序运行时修 改了改了TextText属性值，都会自动触发属性值，都会自动触发ChangeChange事件。事件。 （2 2）只有对象的）只有对象的EnabledEnabled和和VisibleVisible的属性值是的属性值是TrueTrue时，时， 它才有获得焦点的能力。在程序运行时，用户可以通过鼠它才有获得焦点的能力。在程序运行时，用户可以通过鼠 标单击或者按标单击或者按TabTab键切换，使某个控件获得焦点。键切换，使某个控件获得焦点。 （3 3）当用户按下并且释放

32、键盘上的一个键，将会触发焦）当用户按下并且释放键盘上的一个键，将会触发焦 点所在控件的点所在控件的KeyPressKeyPress事件。该事件返回所输入字符的事件。该事件返回所输入字符的 UnicodeUnicode码，在程序中加以判断，就会识别出用户刚才按下码，在程序中加以判断，就会识别出用户刚才按下 了哪个键。了哪个键。DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程81 例例3.13.1：在文本框中输入密码，然后单击窗体，在文本框中输入密码，然后单击窗体， 在标签中显示该密码。在标签中显示该密码。 完成步骤：完成步骤： l新建一个工程，在窗体上分别创

33、建新建一个工程，在窗体上分别创建2 2个标签、个标签、1 1个文本个文本 框和框和1 1个命令按钮。在属性窗口中对窗体和控件的属性进个命令按钮。在属性窗口中对窗体和控件的属性进 行设置。行设置。 l文本框的文本框的PasswordCharPasswordChar属性值设置为属性值设置为“* *”，表示输，表示输 入的字符都显示为入的字符都显示为“* *”；标签；标签Label2Label2的的BorderStyleBorderStyle属属 性值设置为性值设置为1 1，表示该标签有边框。，表示该标签有边框。 DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程

34、82 Private Sub Form_Click() Label2.Caption = 您输入的密码是：您输入的密码是： + Text1.Text End Sub Private Sub Command1_Click() End End Sub DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程83 3.5 3.5 命令按钮命令按钮 命令按钮（命令按钮（CommandButton）控件通常用）控件通常用 来接受用户的操作命令，一般通过单击命令按来接受用户的操作命令，一般通过单击命令按 钮来触发事件过程，执行指定的操作，从而实钮来触发事件过程，执行指定的操作

35、，从而实 现特定的功能。在工具箱中表示为：现特定的功能。在工具箱中表示为： 命令按钮的常用属性 属性属性作用作用 Name设置命令按钮的对象名设置命令按钮的对象名 Caption设置命令按钮的标题设置命令按钮的标题 Default确定命令按钮是否为确定命令按钮是否为Enter键的默认按钮键的默认按钮 Cancel确定命令按钮是否为确定命令按钮是否为Esc键的默认按钮键的默认按钮 Enabled确定命令按钮是否有效，默认值是确定命令按钮是否有效，默认值是True，表示有效，表示有效 Visible确定命令按钮是否可见，默认值是确定命令按钮是否可见，默认值是True，表示可见，表示可见 Style

36、设置命令按钮的外观，默认值是设置命令按钮的外观，默认值是0，表示只能显示文字，表示只能显示文字 Picture设置命令按钮上显示的图片文件设置命令按钮上显示的图片文件 DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程84 说明：说明： （1 1）程序第一个命令按钮控件的默认对象名是）程序第一个命令按钮控件的默认对象名是Command1Command1，依，依 次类推。次类推。 （2 2）设置）设置CaptionCaption属性时，在标题的某个字母前插入一个连属性时，在标题的某个字母前插入一个连 接符（接符（b End Sub DATE yyyy/M/d|

37、2021/3/31Visual Basic程序设计简明教程 10 4 4.3 If4.3 If语句语句ElseIfElseIf结构结构 If 表达式表达式1 Then 语句块语句块1 ElseIf 表达式表达式2 Then 语句块语句块2 ElseIf 表达式表达式n Then 语句块语句块n Else 语句块语句块n+1 End If 是是 语句块语句块n+1 是是 否否 表达式表达式1为真为真 语句块语句块1 否否 表达式表达式n为真为真 语句块语句块n 是是 否否 表达式表达式2为真为真 语句块语句块2 DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教

38、程 10 5 说明：说明： l判断某个条件时存在一个前提，即前面的所有判断某个条件时存在一个前提，即前面的所有 条件都不成立。条件都不成立。 l尽管尽管ElseIfElseIf结构有多个分支，但是仍然只有一结构有多个分支，但是仍然只有一 个分支的语句块会被执行。这种结构特别适合处理个分支的语句块会被执行。这种结构特别适合处理 有多个互相排斥的条件存在的情况，例如计算分段有多个互相排斥的条件存在的情况，例如计算分段 函数的值。函数的值。 DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程 10 6 例例4.34.3 计算分段函数的值计算分段函数的值 Priva

39、te Sub Command3_Click() Dim x As Single, y! x=Val(InputBox(请输入请输入x的值的值) If x2 Then 判断判断x是否小于是否小于2 y=2*x+1 ElseIf x8 Then 判断判断x是否在是否在2和和8之间之间 y=x-3 Else 前面两个条件都不满足前面两个条件都不满足 y=3*x-1 End If Print y=;y End Sub DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程 10 7 4.3 If4.3 If语句语句IfIf语句的嵌套语句的嵌套 If 表达式表达式1 Th

40、en If 表达式表达式1_1 Then 语句块语句块1_1 Else 语句块语句块1_2 End If Else If 表达式表达式2_1 Then 语句块语句块2_1 Else 语句块语句块2_2 End If End If 是是 否否 是是 否否 是是表达式表达式1_1为真为真 语句块语句块1_1语句块语句块1_2语句块语句块2_1 表达式表达式2_1为真为真 语句块语句块2_2 否否 表达式表达式1为真为真 DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程 10 8 例例4.44.4 用用IfIf语句的嵌套实现语句的嵌套实现例例4.3 4.3 。

41、Private Sub Command4_Click() Dim x As Single, y! x=Val(InputBox(请输入请输入x的值的值) If x8 Then 判断判断x是否小于是否小于8 If xb,a,b) DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程 11 0 4.4 Select Case4.4 Select Case语句语句 Select Case 表达式表达式 Case 表达式列表表达式列表1 语句块语句块1 Case 表达式列表表达式列表2 语句块语句块2 Case 表达式列表表达式列表n 语句块语句块n Case Els

42、e 语句块语句块n+1 End Select 先计算表达式的值， 然后与n个Case右边的表 达式列表逐一比较。如 果和其中某个表达式列 表的值相等或者匹配， 则执行该Case后面的语 句块；如果与所有的 Case表达式列表均不匹 配，则执行Case Else后 面的语句块。 执行流程执行流程 DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程 11 1 作息时间表的实现作息时间表的实现 Select Case t t为输入的查询时间为输入的查询时间 Case 7,14 MsgBox (起床起床) Case 7.5 To 8,12 To 12.5,17.5

43、To 18 MsgBox (用餐用餐) Case 8.5 To 11.5,14.5 To 17 MsgBox (上课上课) 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在

44、2和8之间 y = x - 3 Case Else x8 y = 3 * x - 1 End Select Print y=; y End Sub 例例4.54.5 用用Select Select CaseCase语句实现语句实现例例4.34.3 DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程 11 2 4.5 框架 框架（框架（FrameFrame）控件是一种容器型控件，）控件是一种容器型控件， 用于将窗体中的控件分组。用于将窗体中的控件分组。在工具箱中表示在工具箱中表示 为：为： 框架的常用属性 属性属性作用作用 Name设置框架的对象名设置框架的对

45、象名 Caption设置框架所显示的文本信息设置框架所显示的文本信息 Enabled确定框架是否有效确定框架是否有效 Visible确定框架是否可见确定框架是否可见 DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程 11 3 说明：说明： l程序第一个框架控件的默认对象名是程序第一个框架控件的默认对象名是Frame1， 依次类推。依次类推。 lCaption属性设定了框架的标题，如果属性属性设定了框架的标题，如果属性 值为空串，则框架控件在外观上与一个封闭值为空串，则框架控件在外观上与一个封闭 的矩形框类似。的矩形框类似。 l当当Enabled的属性值是的

46、属性值是False时，不仅框架失时，不仅框架失 效，而且框架内的所有控件也都会失效。当效，而且框架内的所有控件也都会失效。当 Visible的属性值是的属性值是False时，则框架连同其时，则框架连同其 中的所有控件都将被隐藏。中的所有控件都将被隐藏。 DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程 11 4 4.6 单选按钮 单选按钮（单选按钮（OptionButtonOptionButton） 控件具有控件具有选择选择功能，在程序界功能，在程序界 面中必须成组出现。在工具箱面中必须成组出现。在工具箱 中表示为：中表示为： 属性属性作用作用 Name设

47、置单选按钮的对象名设置单选按钮的对象名 Caption设置单选按钮的标题设置单选按钮的标题 Alignment设置单选按钮标题的位置，默认值是设置单选按钮标题的位置，默认值是0，表示单选按钮在左边，表示单选按钮在左边， 标题在右边标题在右边 Value设置单选按钮的状态，默认值是设置单选按钮的状态，默认值是False Style设置单选按钮的外观，默认值是设置单选按钮的外观，默认值是0，表示标准方式，表示标准方式 Picture设置在单选按钮上显示的图片文件设置在单选按钮上显示的图片文件 DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程 11 5 说明：说

48、明： l程序第一个单选按钮控件的默认对象名是程序第一个单选按钮控件的默认对象名是Option1，依，依 次类推。次类推。 lValue是单选按钮控件最重要的属性，其属性值有是单选按钮控件最重要的属性，其属性值有2个，个， True和和False。True表示单选按钮被选中，而表示单选按钮被选中，而False表示未表示未 被选中。如果某一个单选按钮的被选中。如果某一个单选按钮的Value属性值是属性值是True，必，必 然意味着同组中其它单选按钮的然意味着同组中其它单选按钮的Value属性值是属性值是False。 lStyle的属性值有的属性值有2个，个，0和和1。1表示图形方式，此时单表示图形

49、方式，此时单 选按钮的外观类似于命令按钮。如果单选按钮未被选中，选按钮的外观类似于命令按钮。如果单选按钮未被选中， 就会显示由就会显示由Picture属性指定的图片文件；如果单选按钮被属性指定的图片文件；如果单选按钮被 选中，则会显示由选中，则会显示由DownPicture属性指定的图片文件。属性指定的图片文件。 DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程 11 6 4.7 复选框 复选框（复选框（CheckBox）控件也具有选择）控件也具有选择 功能，一般在程序界面中成组出现，功能，一般在程序界面中成组出现， 用户在一组复选框中一次可以选择多用户在

50、一组复选框中一次可以选择多 个。在工具箱中表示为：个。在工具箱中表示为： 复选框的常用属性 属性属性作用作用 Name设置复选框的对象名设置复选框的对象名 Caption设置复选框的标题设置复选框的标题 Alignment设置复选框标题的位置，默认值是设置复选框标题的位置，默认值是0，表示复选框在左边，标，表示复选框在左边，标 题在右边题在右边 Value设置复选框的状态，默认值是设置复选框的状态，默认值是0 Style设置复选框的外观，默认值是设置复选框的外观，默认值是0，表示标准方式，表示标准方式 Picture设置在复选框上显示的图片文件设置在复选框上显示的图片文件 DATE yyyy/

51、M/d|2021/3/31Visual Basic程序设计简明教程 11 7 说明：说明： l程序第一个复选框控件的默认对象名是程序第一个复选框控件的默认对象名是 Check1，依次类推。，依次类推。 lValue是复选框控件最重要的属性，其是复选框控件最重要的属性，其 属性值有属性值有3个。个。 常量常量值值含义含义 Unchecked0未被选中未被选中 Checked1被选中被选中 Grayed2复选框变成灰色，禁止用户选择复选框变成灰色，禁止用户选择 DATE yyyy/M/d|2021/3/31Visual Basic程序设计简明教程 11 8 第第5 5章章 循环结构循环结构 DAT

52、E yyyy/M/d|2021/3/ 31Visual BasicVisual Basic程序设计简明教程程序设计简明教程 11 9 5.1 5.1 While语句 While 表达式表达式 循环体循环体 Wend 否否 是是 表达式为真表达式为真 循环体循环体 语句语句 DATE yyyy/M/d|2021/3/31Visual BasicVisual Basic程序设计简明教程程序设计简明教程 12 0 说明：说明： （1 1）循环语句的表达式一般是关系或者逻辑表达）循环语句的表达式一般是关系或者逻辑表达 式，以构成循环条件。如果是算术表达式，则按照式，以构成循环条件。如果是算术表达式，则

53、按照 “非非0 0为真为真”的原则，把算术表达式的值转换为逻辑值。的原则，把算术表达式的值转换为逻辑值。 （2 2）应该把需要重复执行的语句组成循环体。）应该把需要重复执行的语句组成循环体。 （3 3）如果在循环之前需要先判断条件，则采用）如果在循环之前需要先判断条件，则采用 whilewhile语句较为合适。语句较为合适。 DATE yyyy/M/d|2021/3/31Visual BasicVisual Basic程序设计简明教程程序设计简明教程 12 1 例例5.15.1 1+2+3+4+5+100=1+2+3+4+5+100=？ Private Sub Command1_Click(

54、) Dim i As Integer, sum As Integer i = 1 循环初值循环初值 sum = 0 While i = 100 循环条件循环条件 sum = sum + i 循环体循环体 i = i + 1 Wend Print sum=; sum End Sub DATE yyyy/M/d|2021/3/31Visual BasicVisual Basic程序设计简明教程程序设计简明教程 12 2 5.2 5.2 Do-Loop语句 （1）Do While-Loop Do While 表达式表达式 循环体循环体 Loop （2）Do-Loop While Do 循环体循环体

55、Loop While 表达式表达式 DATE yyyy/M/d|2021/3/31Visual BasicVisual Basic程序设计简明教程程序设计简明教程 12 3 Do-Loop While Do-Loop While的的 循环条件位于循环语循环条件位于循环语 句的后面，属于句的后面，属于“直直 到型到型”循环，不断地循环，不断地 执行循环体，直到循执行循环体，直到循 环条件不成立为止。环条件不成立为止。 否否 是是 循环体循环体 表达式为真表达式为真 语句语句 DATE yyyy/M/d|2021/3/31Visual BasicVisual Basic程序设计简明教程程序设计简明

56、教程 12 4 说明：说明： （1 1）注意）注意Do-Loop WhileDo-Loop While与与Do While-LoopDo While-Loop的区的区 别。由于别。由于Do-Loop WhileDo-Loop While是先执行循环体后判断循环是先执行循环体后判断循环 条件，所以它的循环体至少执行一次，而条件，所以它的循环体至少执行一次，而Do While-Do While- LoopLoop语句的循环体有可能一次也不执行。语句的循环体有可能一次也不执行。 （2 2）如果需要先执行再判断循环条件，则采用）如果需要先执行再判断循环条件，则采用 Do-Loop WhileDo-Lo

57、op While较为合适。较为合适。 DATE yyyy/M/d|2021/3/31Visual BasicVisual Basic程序设计简明教程程序设计简明教程 12 5 例例5.25.2 1+2+3+4+5+100=1+2+3+4+5+100=？ Private Sub Command2_Click() Dim i As Integer, sum As Integer i = 1 循环初值循环初值 sum = 0 Do sum = sum + i 循环体循环体 i = i + 1 Loop While i 4000 Then Exit Do End If sum = sum + i i

58、= i + 1 Loop While i 4000 Then Exit For End If sum = sum + i Next i 5.4 5.4 流程转向语句流程转向语句Exit ForExit For DATE yyyy/M/d|2021/3/31Visual BasicVisual Basic程序设计简明教程程序设计简明教程 13 3 5.5 5.5 循环嵌套循环嵌套 l循环嵌套又称为多重循环，是指在一个循环结循环嵌套又称为多重循环，是指在一个循环结 构的循环体中又包含另一个完整的循环结构。构的循环体中又包含另一个完整的循环结构。 l通常把嵌套在循环体内的循环结构称为内循环，通常把嵌

59、套在循环体内的循环结构称为内循环， 把外层的循环结构称为外循环。把外层的循环结构称为外循环。 l在程序中一般把最内层循环的总循环次数作为在程序中一般把最内层循环的总循环次数作为 多重循环的循环次数。多重循环的循环次数。 DATE yyyy/M/d|2021/3/31Visual BasicVisual Basic程序设计简明教程程序设计简明教程 13 4 例例5.55.5 打印九九乘法口诀表打印九九乘法口诀表 Private Sub Command1_Click() Dim i As Integer, j As Integer, s As String For i = 1 To 9 控制输出行

60、控制输出行 For j = 1 To i 输出该行的内容输出该行的内容 s = j s; Next j Print 每一行结束后换行每一行结束后换行 Next i End Sub DATE yyyy/M/d|2021/3/31Visual BasicVisual Basic程序设计简明教程程序设计简明教程 13 5 5.6 5.6 循环算法循环算法 算法是对某个问题求解过程的描述。算法是对某个问题求解过程的描述。 循环算法主要有穷举法和迭代法，编循环算法主要有穷举法和迭代法，编 写循环程序时还经常会用到标志法和计写循环程序时还经常会用到标志法和计 数器等技巧。数器等技巧。 5.6 循环算法穷举