大学VB课堂 第四章第二节
合集下载
vb课件第四章
2011-2-28
第4章 选择控件与分支程序设计 章
组合框是具有文本框控件与列表框控件特性的控件。组合框 系统的隐含名称为Combo1、Combo2等章
组合框属性 （1）Style属性 属性 当Style设置为0时（默认样式），是下拉式组合框。单击右侧的 箭头时打开选项列表，可从打开的列表中选择列表项目，选择 的列表项目将显示在文本框中。也可直接在文本框中输入文本， 在DropDown等事件过程中把文本框内容增加到组合框中。 当Style设置为1时，是简单组合框。这时文本框右侧无箭头按钮， 它看起来象一个文本框和一个标准列表框的结合，列表项始终 显示在列表框中。可以从列表中选择项，也可以直接在文本框 中输入文本。 当Style设置为2时，是下拉式列表框，它与下拉式组合框相似。 单击右侧的箭头时打开选项列表，可从打开的列表中选择列表 项目，选择的列表项目将显示在文本框中；通过输入可以快速 选择文本。与下拉式组合框不同的是：它不能在文本框中输入 新的内容。
2011-2-28
第4章 选择控件与分支程序设计 章
（2）Text属性 属性 返回列表框被选择的列表项目，是字符串类型。在Style为0 或1时可以键入文本。 组合框的（名称）属性系统隐含为Combo1，Combo2等。 在列表框中的属性同样适于组合框。
2011-2-28
第4章 选择控件与分支程序设计 章
Select Case 测试表达式 Case 表达式列表 表达式列表1 语句序列1 语句序列 Case 表达式列表 表达式列表2 语句序列2 语句序列 ········· Case 表达式列表 表达式列表n 语句序列n 语句序列 [Case Else 语句序列n+1] 语句序列 End Select
2011-2-28
VB第04章Word版
第四章算法基础及VB的基本语句的知识点习题考点详细分析1、能写一些简单的算法，明白算法即是一解题步骤2、赋值语句和input和msgbox函数注意不同类型数据的赋值转换，俩函数的参数3、分支结构与分支结构语句if语句的三种转换形式select-case-end select结构语句的使用4、循环结构与循环结构语句do-loop结构语句（当型与直到型在条件不满足时区别）for-next结构语句（注意循环控制参数）循环嵌套（初值的位置、随机函数的使用）（关于算法）明白算法就是给出解决问题的步骤给出下列题目的算法：1、给出一个求一元俩次方程根的算法（ax2+bx+c=0）2、求一个圆的周长和面积3、根据个人工资给出交税数目4、设计一个判断某正整数是一个回文数的算法。
（回文数：该数的左右数字完全对称的自然数，如121、1551等）（关于赋值语句和俩函数）1、赋值语句的一般形式__变量名=表达式__2、当系统执行一个赋值语句时，先求出“=”_右边表达式______的值，然后再把该值保存到“=”___左边变量___中，这就是“赋值”分析：基本概念答案：右边表达式左边变量3、针对语句 If I=1 then J=1，下列说法正确的是__C__ (03春)A.I=1 和J=1均为赋值语句B.均为关系表达式C.I=1为关系表达式，J=1为赋值语句D.I=1为赋值语句，J=1为关系表达式分析：基本结构语句答案：C4、运行下面的程序，单击命令按钮command1，则立即窗口上显示的结果是__A__(03春)private sub command1_click()dim A as integer,B as Boolean,C asInteger,D as integerA=20/3:B=true:C=B:D=A+CDebug. Print A, D,；A=A + CEnd subA、7 6 FalseB、6 6 5.6FalseC、7 6 A=6D、78 A=8分析：不同数据类型赋值问题答案：A5、在文本框Text1中输入数字12，Text2中输入数字34，执行以下语句，只有__B______可使文本框Text3中显示46。
VB教程完整版第4章Visual Basic的基本控制结构PPT课件
第4章：Visual Basic基本控制结构
5
17.08.2020
第4章：Visual Basic基本控制结构
6
17.08.2020
3. If…Then…ElseIf语句（多分支结构） 当要处理的实际问题有多个条件时，就
要用到该语句结构。
语句格式如下：
If <条件表达式1> Then <语句块1>
17.08.2020
第4章：Visual Basic基本控制结构
14
4.3 循环结构 循环结构是根据某一条件（即循环条件）反
复执行某一段程序（即循环体）。循环体被反复 执行的次数称为循环次数。VB中提供了两种类型 的循环语句：计数型循环语句和条件型循环语句。
4.3.1 For…Next 语句 该语句是计数型循环语句，用于循环次数已知
13
Select Case 语句和If…Then…ElseIf语句 的区别
可以看出，对于多分支选择结构，用Select Case 语句比用If…Then…ElseIf语句更为 直观，程序可读性强。两者的区别在于： Select Case 语句只对单一表达式求值，并 根据求值结果执行不同的语句块，而 If…Then…ElseIf语句可以对不同的表达式 求值。所以，当对多个条件进行判断时， 只能用If…Then…ElseIf语句。
Select Case 语句的格式如下： Select Case 测试表达式
Case 表达式值1 <语句块1>
Case 表达式值2 <语句块2>
…
[Case Else <语句块n+1>]
End Select
第4章：Visual Basic基本控制结构
VB第4章电子讲稿 (选择结构)
表达式表通常是一个具体值(如Case 1)，每一个 值确定一个分支。还有三种方法可以确定设定值：
(1)一组值(用逗号隔开)。示例： Case 1,3,5 ′表示条件在1，3，5范围内取值 (2)表达式1 TO 表达式2。示例： Case 60 To 80 ′表示条件取值范围为60～80 (3)Is关系式。示例： Case Is<5
Private Sub Command1_Click() Dim score As Integer, temp As String score = Val(Text1.Text) temp = "成绩等级为：" If score < 0 Then Label2.Caption = "成绩出错" ElseIf score < 60 Then Label2.Caption = temp + "不及格" ElseIf score <= 79 Then Label2.Caption = temp + "及格" ElseIf score <= 100 Then Label2.Caption = temp + "优良" Else Label2.Caption = "成绩出错" End If End Sub
Dim h As Integer Show '使print输出在窗体上的内容可见 h = Hour(Time) '取系统的时间 FontSize = 30 : ForeColor = RGB(255, 0, 0) BackColor = RGB(255, 255, 0) If h < 12 Then Print "早上好！" Else If h < 18 Then Print "下午好！" Else Print "晚上好！" End If End If
课件：VB第4章
通用过程
2021/6/23
类模块：本书不涉及
17
1. 局部变量（Dim, Static定义） 在过程内定义的变量，作用域为所在过 程(子程序)
2021/6/23
18
2. 模块变量（Dim, Private定义） 作用域为该窗体或该标准模块 3. 全局变量(Public, Global定义) 作用域为该工程中的所有模块
Const PI# = 3.1415926535 Const PI As Double = 3.1415926535 Private: 私有的，表明该常量只在本过程或窗体中使用。 Public: 公共的，表明该常量可在多个模块中公用，必须在标
准模块中定义。
2021/6/23
13
3. 系统常量
VB中预定 义的，一 般以vb字 母开头， 可在对象 浏览器中 查看。
2021/6/23
14
4.2.2 变量
1. 命名规则
同C语言，不同点：
• 最后一个字符可以是类型说明符
• 不区分大小写
Var1$，Var2％，Var3!
var1 = “abc”, var2 = 5, var3 = 3.25
2. 变量的类型和定义
• 用类型说明符: Var2％
• Dim: Dim 变量名 As 类型,Dim Var2 As
Integer
• Static: Static Var2 As Integer
• Public: Public Var3 As Single
2021/6/23
15
2021/6/23
16
4.3变量的作用域
4.3.1局部变量与全局变量
VB应用程序
窗体模块 标准模块
2021/6/23
类模块：本书不涉及
17
1. 局部变量（Dim, Static定义） 在过程内定义的变量，作用域为所在过 程(子程序)
2021/6/23
18
2. 模块变量（Dim, Private定义） 作用域为该窗体或该标准模块 3. 全局变量(Public, Global定义) 作用域为该工程中的所有模块
Const PI# = 3.1415926535 Const PI As Double = 3.1415926535 Private: 私有的，表明该常量只在本过程或窗体中使用。 Public: 公共的，表明该常量可在多个模块中公用，必须在标
准模块中定义。
2021/6/23
13
3. 系统常量
VB中预定 义的，一 般以vb字 母开头， 可在对象 浏览器中 查看。
2021/6/23
14
4.2.2 变量
1. 命名规则
同C语言，不同点：
• 最后一个字符可以是类型说明符
• 不区分大小写
Var1$，Var2％，Var3!
var1 = “abc”, var2 = 5, var3 = 3.25
2. 变量的类型和定义
• 用类型说明符: Var2％
• Dim: Dim 变量名 As 类型,Dim Var2 As
Integer
• Static: Static Var2 As Integer
• Public: Public Var3 As Single
2021/6/23
15
2021/6/23
16
4.3变量的作用域
4.3.1局部变量与全局变量
VB应用程序
窗体模块 标准模块
vb 课件 第四章
Visual Basic程序设计
第四章 基本的控制结构
4.1 顺序结构 4.2 选择结构 4.3 循环结构 4.4 其他辅助控制语句 4.5 综合应用 4.6 程序调试 4.7 常见错误
2011年10月9日星期日
商丘师范学院计算机科学系
Visual Basic程序设计
4.1 顺序结构
顺序结构就是各语句按出现的先后次序 执行。 一般的程序设计语言中， 执行 。 一般的程序设计语言中 ， 顺序结构的 语句主要是赋值语句、输入/输出语句等 输出语句等。 语句主要是赋值语句、 输入 输出语句等 。在 VB中也有赋值语句；而输入 输出可以通过文 中也有赋值语句； 中也有赋值语句 而输入/输出可以通过文 本 框 控 件 、 标 签 控 件 、 InputBox 函 数 、 MsgBox函数或过程及 函数或过程及Print方法等来实现。 方法等来实现。 函数或过程及 方法等来实现
①
当表达式值的精度与变量的精度不一致时， 当表达式值的精度与变量的精度不一致时，强制转换成左边 的精度， 中的结果为3 的精度，如m% = 10/3 ，则m中的结果为 中的结果为 当表达式是数字字符串，左边变量是数值类型， 当表达式是数字字符串，左边变量是数值类型，自动转换为 数值类型再赋值，但表达式有非数字字符时，则出错。 数值类型再赋值，但表达式有非数字字符时，则出错。 例如： 例如： n%=“123” n%=“12a3”
④ ⑤
⑥
⑦
2011年10月9日星期日
商丘师范学院计算机科学系
Visual Basic程序设计
4.1.2 数据的输入与输出
1.标签和文本框控件 1.标签和文本框控件 标签可以输出信息，文本框即可输入也可输出信息。 标签可以输出信息，文本框即可输入也可输出信息。 输入对话框InputBox函数 2. 输入对话框 函数 InputBox[$](Prompt, [Tiltle], [Default], [Xpos], [Ypos]) 其中： 其中： 1) Prompt: 字符串，长度不超过 字符串，长度不超过1024个字符，用来提示用户输入。 个字符， 个字符 用来提示用户输入。 文本可自动换行。如想强制插入回车换行则用： 文本可自动换行。如想强制插入回车换行则用： Chr$(13)+Chr$(10)或常数 或常数vbCrLf。 或常数 。 2) Title：字符串，对话框标题，显示在对话框顶部的标题区。 ：字符串，对话框标题，显示在对话框顶部的标题区。 3) Default: 字符串，用来显示输入缓冲区的默认信息。 字符串，用来显示输入缓冲区的默认信息。 4) Xpos，Ypos：是两个整数值，确定对话框在屏幕上的位置；如 ， ：是两个整数值，确定对话框在屏幕上的位置； 果省略，则对话框显示在屏幕中心线向下约1/3处 果省略，则对话框显示在屏幕中心线向下约 处。
第四章 基本的控制结构
4.1 顺序结构 4.2 选择结构 4.3 循环结构 4.4 其他辅助控制语句 4.5 综合应用 4.6 程序调试 4.7 常见错误
2011年10月9日星期日
商丘师范学院计算机科学系
Visual Basic程序设计
4.1 顺序结构
顺序结构就是各语句按出现的先后次序 执行。 一般的程序设计语言中， 执行 。 一般的程序设计语言中 ， 顺序结构的 语句主要是赋值语句、输入/输出语句等 输出语句等。 语句主要是赋值语句、 输入 输出语句等 。在 VB中也有赋值语句；而输入 输出可以通过文 中也有赋值语句； 中也有赋值语句 而输入/输出可以通过文 本 框 控 件 、 标 签 控 件 、 InputBox 函 数 、 MsgBox函数或过程及 函数或过程及Print方法等来实现。 方法等来实现。 函数或过程及 方法等来实现
①
当表达式值的精度与变量的精度不一致时， 当表达式值的精度与变量的精度不一致时，强制转换成左边 的精度， 中的结果为3 的精度，如m% = 10/3 ，则m中的结果为 中的结果为 当表达式是数字字符串，左边变量是数值类型， 当表达式是数字字符串，左边变量是数值类型，自动转换为 数值类型再赋值，但表达式有非数字字符时，则出错。 数值类型再赋值，但表达式有非数字字符时，则出错。 例如： 例如： n%=“123” n%=“12a3”
④ ⑤
⑥
⑦
2011年10月9日星期日
商丘师范学院计算机科学系
Visual Basic程序设计
4.1.2 数据的输入与输出
1.标签和文本框控件 1.标签和文本框控件 标签可以输出信息，文本框即可输入也可输出信息。 标签可以输出信息，文本框即可输入也可输出信息。 输入对话框InputBox函数 2. 输入对话框 函数 InputBox[$](Prompt, [Tiltle], [Default], [Xpos], [Ypos]) 其中： 其中： 1) Prompt: 字符串，长度不超过 字符串，长度不超过1024个字符，用来提示用户输入。 个字符， 个字符 用来提示用户输入。 文本可自动换行。如想强制插入回车换行则用： 文本可自动换行。如想强制插入回车换行则用： Chr$(13)+Chr$(10)或常数 或常数vbCrLf。 或常数 。 2) Title：字符串，对话框标题，显示在对话框顶部的标题区。 ：字符串，对话框标题，显示在对话框顶部的标题区。 3) Default: 字符串，用来显示输入缓冲区的默认信息。 字符串，用来显示输入缓冲区的默认信息。 4) Xpos，Ypos：是两个整数值，确定对话框在屏幕上的位置；如 ， ：是两个整数值，确定对话框在屏幕上的位置； 果省略，则对话框显示在屏幕中心线向下约1/3处 果省略，则对话框显示在屏幕中心线向下约 处。
计算机二级VB教程4
注意：若把0<x<10作为VB表达式，失去数学含义。
13
Visual Basic程序设计教程
4.4.1 使用行If语句
行If语句的格式为： If 条件 Then 语句1 [Else 语句2 ] If 条件 Then 语句1
14
Visual Basic程序设计教程
它实现如图所示的选择结构流程。 行If要求代码写在一行内，语句过长可用续行符 如果语句1或语句2有多条语句，则用冒号“:”分隔。
4
Visual Basic程序设计教程
编写程序时，会有多种可选择的算法。 不仅要保证算法正确，还应考虑算法的质量。 算法表示：自然语言、流程图、结构图等。 算法决定了程序的结构。
5
Visual Basic程序设计教程
选择结构是程序结构中的一种形式。 根据给定的条件来决定执行不同的程序代码段。 流程可以如图所示。
大学计算机基础教程
TaiYuan University of Technology
第4章 设计选择结构程序
Visual Basic 程序设计教程
本章主要介绍： 选择结构： 有关表达式 单分支语句 多分支语句 单选按钮 复选框
2
Visual Basic程序设计教程
程序就是数据加算法。
算法的优劣关系到程序质量的好坏。
变量y存放比较结果。但可读性不好。
如果使用块If来编程，程序代码为：
If x >= 0 Then If x = 0 Then y=0 Else y=1 End If
Else y = -1
End If
嵌套时，程序注意使用缩进格式，增加可读性。
25
Visual Basic程序设计教程
【例】在窗体中轮流以不同字体显示文字
13
Visual Basic程序设计教程
4.4.1 使用行If语句
行If语句的格式为： If 条件 Then 语句1 [Else 语句2 ] If 条件 Then 语句1
14
Visual Basic程序设计教程
它实现如图所示的选择结构流程。 行If要求代码写在一行内，语句过长可用续行符 如果语句1或语句2有多条语句，则用冒号“:”分隔。
4
Visual Basic程序设计教程
编写程序时，会有多种可选择的算法。 不仅要保证算法正确，还应考虑算法的质量。 算法表示：自然语言、流程图、结构图等。 算法决定了程序的结构。
5
Visual Basic程序设计教程
选择结构是程序结构中的一种形式。 根据给定的条件来决定执行不同的程序代码段。 流程可以如图所示。
大学计算机基础教程
TaiYuan University of Technology
第4章 设计选择结构程序
Visual Basic 程序设计教程
本章主要介绍： 选择结构： 有关表达式 单分支语句 多分支语句 单选按钮 复选框
2
Visual Basic程序设计教程
程序就是数据加算法。
算法的优劣关系到程序质量的好坏。
变量y存放比较结果。但可读性不好。
如果使用块If来编程，程序代码为：
If x >= 0 Then If x = 0 Then y=0 Else y=1 End If
Else y = -1
End If
嵌套时，程序注意使用缩进格式，增加可读性。
25
Visual Basic程序设计教程
【例】在窗体中轮流以不同字体显示文字
VB第4章
开封大学五专部
4.1.2 静态数组
2. 多维数组
【例4-2】某小学六个年级各有8个班，可以用 】 下面的方法声明一个数组students用于存放每 个班的人数。 Static students(5, 7) As Integer 或者也可以这样声明： Static students(1 To 6, 1 To 8) As Integer 如果每个班级都是40人，可以用以下过程将人 数填入数组students，运行结果如图4-2所示。
开封大学五专部
第4章 数组与过程
4.1 数组 4.2 过程
开封大学五专部
Байду номын сангаас
4.1 数组
4.1.1 4.1.2 4.1.3 4.1.4 4.1.5 数组的概念 静态数组 动态数组 控件数组 数组的基本操作
开封大学五专部
4.1.1 数组的概念
1. 数组的基本概念 数组是具有相同数据类型的元素所组成的有序集合， 可以用数组名及下标惟一地识别一个数组的元素。 2. 数组的下标和维数 数组的下标即数组的索引，它规定了数组中元素的个 数和位置，其下标值惟一地标识了一个数组元素。 数组的下标个数称为数组的维数。 3. 数组的数据类型和大小 作为变量，数组也具有数据类型。数组的类型就是数 组中各元素的数据类型，同一数组中的所有元素具有 相同的数据类型。
开封大学五专部
4.1.2 静态数组 2. 多维数组
在声明时，数组有两个或两个以上的下标，则该数组 即为多维数组。 多维数组的定义： Dim 数组名([下标 To] 上界，[[下标 To] 上界, ...]) [As 数据类型] 声明多维数组可以使用逗号分隔符分隔多个数组的下 标。 例如： Dim iArray(0 To 3, 0 To 4) As Integer Dim iArray(3, 4) As Integer 分析表4-1(61页)
visual basic程序设计基础全套教程、教案第四章VB语言基础ppt课件_图文
(二) 变量
一个有名称的内存位置称为变量 变量用来存储数据，每个变量都有一个名字和相应的数据类型 1、变量名的命名规则 •只能由字母、数字和划线组成 •名字的第一个字符必须是英文字母或汉字 •名字最长为255个字符 •类型申明符可以出现在变量名之后 •不能用VB的保留字作为变量名 练习：下面哪些是合法的变量名 A ）a B)abcd# C)a$x D)c_e E)xx$ F) Rem G）4dele* H)print 2、变量的类型和定义 •变量的类型是通过类型说明符来标识的 如：total! lname#
➢仅含有空格的字符串和空字符串是不一样的，前者字符 串长度不为零 ，后者长度为零
VB6.0的字符串又分为定长字符串和变长字符串
如：Dim a as string *20 作用：声明长度为20的定长字符串变量a
dim b as string
作用：声明字符串bianchang 变量b
2.数值型
字节型：用1个字节 存储的无符号十进制数
Public或 Global
1.下列四个选项中，是VB的数值常量的是 A)1E-6 B)1*E6 C)1E D)1*E-6 2. 下面四个数中，作为常量有语法错误的是 A)123.456# B)1234! C)1.32D-23 D)1.89E1.1 3.VB规定，不同类型的数据占用存储空间的长度是不同的，下列各组数据类型中，满足占用存储 空间从小到大的顺序排列的是 A）Byte,Integer,long,Double B)Byte,Integer,Double Boolean C)Booblen,byte ,Integer,Double D)Booblen,Byte,Integer,long 4.当用 const A =9.8定义后，下列叙述正确的是 A）A是整型常数 B）A是整型变量 C）A是单精度常数 D）A是变体型的常数
VB教程第4章
Dim myArray(4, 4) As Integer ' 在窗体级模块声明一个二维数组 ' 命令按钮"生成数组"的Click事件,生成一个二维数组 命令按钮"生成数组" 事件, 事件 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _Handles Button1.Click Dim i, j As Integer ' 声明循环体变量 Dim str As String = "" ' 声明用来数组显示的字符串变量 For i = 0 To 4 For j = 0 To 4 myArray(i, j) = Int(Rnd() * 90) + 10 str = str & "myArray" & "(" & i & " , " & j & ")" & " = " & myArray(i, j) & Chr(10) Next Next RichTextBox1.Text = str ' 数组赋值给多行文本框显示 End Sub
Preserve参数用来保留现有数组中的数据. Preserve参数用来保留现有数组中的数据. 参数用来保留现有数组中的数据
例如: 例如: ' 声明 声明MyArray为二维数组 为二维数组 Dim MyArray(,) As Double ' 声明MyArray二维数组的元素个数 声明 二维数组的元素个数 ReDim MyArray(5, 5)
VB课件 第4章
2. 用文本框输入输出数据 文本框是一个文本编辑区域，可在该区域输入、编辑和 显示正文内容。
例4-2 在文本框Text1中输入一个字符，在文本框Text2 中显示相应的ASCII码。利用文本框的KeyPress事件。代 码如下: Private Sub Text1_KeyPress(KeyAscii As Integer) Text1.Text = "" Text2.Text = KeyAscii End Sub
省值，若省略 default，则文本框为空。
4、xpos 指定对话框的左边与屏幕左边的水平距离 5、 ypos 指定对话框的上边与屏幕上边的距离
注意：该函数返回值的类型为字符型。
标题
提示字符串
缺省值
Dim Prompt, Title, Default, Myvalue Prompt = “请输入0或1来代表硬币的正反面” Title = “猜硬币” Default = “0” Myvalue = InputBox(Prompt, Title, Default)
2. 与Print方法有关的函数
(1) Tab（n） 功能：与Print方法一起使用，在参数n指定的位置输出其后 的表达式的值。 Tab(n)从最左第一列算起定位于第n列，若 当前打印位置已超过n列，则定位于下一行的第n列。 说明： 1） n是数值表达式，值为整数，若省略，则将输出点移 动到下一个输出区的起点。 2）若n小于1，则tab将输出位置移动到第1列。
MsgBox函数的返回值
例4-7 MsgBox( ) 应用1。提示是否继续执行程序。 Private Sub Form_Click() msg1=“继续执行吗？” msg2=“例[4-7]提示信息” f=MsgBox(msg1,34,msg2) End Sub 第4行中表明type的值为34=2+32+0， 它决定了对话框中有“终止”、“重试”和 “忽略”三个按钮，图标为“？”， 默认活动按钮为“终止”。 f为MsgBox的返回值， 在本例中f依次为3、4或5。
VB4第四章
第四章
过程、对话框及菜单 过程、
VB程序设计基础教程—第四章 程序设计基础教程
1
本章主要内容
VB的代码模块 VB的代码模块 VB的过程 VB的过程 对话框的分类及应用 菜单设计及应用
VB程序设计基础教程—第四章 程序设计基础教程
2
VB的代码模块 VB的代码模块
3．VB 提供三类模块 ， 它们是窗体模块 、 标准模 类模块：是面向对象编程的基础。在类模块中可以 提供三类模块， 它们是窗体模块、 类模块：：是大多数VB应用程序的基础 窗体模块：是大多数VB应用程序的基础。 1 VB提供三类模块 VB应用程序的基础。窗体模块 窗体模块是面向对象编程的基础。 编写建立新对象的代码。 编写建立新对象的代码 。 这些新对象可以包含自定义 类模块。VB的所有代码都存储在模块中 的所有代码都存储在模块中。 块、类模块。VB的所有代码都存储在模块中。 包含声明部分、 事件过程部分和通用过程部分。 包含声明部分 、 事件过程部分和通用过程部分 。 声明 的属性和方法。类模块文件扩展名为.CLS。 的属性和方法。类模块文件扩展名为.CLS。 部分位于最前面，用Dim语句声明变量。窗体模块文件 部分位于最前面， Dim语句声明变量。 语句声明变量 只包括一个窗体的简单应用程序， 只包括一个窗体的简单应用程序 ， 程序的所有代码都 扩展名为.FRM。 扩展名为.FRM。 存储在窗体模块中； 对于具有多个窗体的程序时， 可 存储在窗体模块中 ； 对于具有多个窗体的程序时 ， 标准模块：包括全局变量声明、 2．标准模块：包括全局变量声明、模块级声明和通用 能在几个窗体中都有要执行的公共代码， ， 模块级声 能在几个窗体中都有要执行的公共代码 ， 为了避免两 过程等几部分。 全局变量声明位于最前面， 过程等几部分 。 全局变量声明位于最前面 个窗体中出现重复代码， 可以创建一个标准模块， 在 个窗体中出现重复代码的 可以创建一个标准模块量 用 明 在 标 准 模 块 中 使ቤተ መጻሕፍቲ ባይዱ用 ，常 量 和 变 量 ， 全 局 变 ， 其中包含实现公共代码的过程。 其中包含实现公共代码的过程。 或 Private 声明 。 标 Public声明 而模块层变量用Dim 声明， Dim或 声明。 Public 声明 ， 而模块层变量用 Dim Private声明 准模块文件扩展名为.BAS。 准模块文件扩展名为.BAS。
过程、对话框及菜单 过程、
VB程序设计基础教程—第四章 程序设计基础教程
1
本章主要内容
VB的代码模块 VB的代码模块 VB的过程 VB的过程 对话框的分类及应用 菜单设计及应用
VB程序设计基础教程—第四章 程序设计基础教程
2
VB的代码模块 VB的代码模块
3．VB 提供三类模块 ， 它们是窗体模块 、 标准模 类模块：是面向对象编程的基础。在类模块中可以 提供三类模块， 它们是窗体模块、 类模块：：是大多数VB应用程序的基础 窗体模块：是大多数VB应用程序的基础。 1 VB提供三类模块 VB应用程序的基础。窗体模块 窗体模块是面向对象编程的基础。 编写建立新对象的代码。 编写建立新对象的代码 。 这些新对象可以包含自定义 类模块。VB的所有代码都存储在模块中 的所有代码都存储在模块中。 块、类模块。VB的所有代码都存储在模块中。 包含声明部分、 事件过程部分和通用过程部分。 包含声明部分 、 事件过程部分和通用过程部分 。 声明 的属性和方法。类模块文件扩展名为.CLS。 的属性和方法。类模块文件扩展名为.CLS。 部分位于最前面，用Dim语句声明变量。窗体模块文件 部分位于最前面， Dim语句声明变量。 语句声明变量 只包括一个窗体的简单应用程序， 只包括一个窗体的简单应用程序 ， 程序的所有代码都 扩展名为.FRM。 扩展名为.FRM。 存储在窗体模块中； 对于具有多个窗体的程序时， 可 存储在窗体模块中 ； 对于具有多个窗体的程序时 ， 标准模块：包括全局变量声明、 2．标准模块：包括全局变量声明、模块级声明和通用 能在几个窗体中都有要执行的公共代码， ， 模块级声 能在几个窗体中都有要执行的公共代码 ， 为了避免两 过程等几部分。 全局变量声明位于最前面， 过程等几部分 。 全局变量声明位于最前面 个窗体中出现重复代码， 可以创建一个标准模块， 在 个窗体中出现重复代码的 可以创建一个标准模块量 用 明 在 标 准 模 块 中 使ቤተ መጻሕፍቲ ባይዱ用 ，常 量 和 变 量 ， 全 局 变 ， 其中包含实现公共代码的过程。 其中包含实现公共代码的过程。 或 Private 声明 。 标 Public声明 而模块层变量用Dim 声明， Dim或 声明。 Public 声明 ， 而模块层变量用 Dim Private声明 准模块文件扩展名为.BAS。 准模块文件扩展名为.BAS。
VB第4章详细介绍
True
结束
4.3 循环结构
3. 循环的嵌套
在一个循环中又完整地包含另一个循环 对于循环的嵌套，要注意以下事项： 对于循环的嵌套，要注意以下事项： （1）内循环变量与外循环变量不能同名； ）内循环变量与外循环变量不能同名； （2）外循环必须完全包含内循环，不能交叉； ）外循环必须完全包含内循环，不能交叉； （3）不能从循环体外转向循环体内，也不能从 ）不能从循环体外转向循环体内， 外循环转向内循环，反之则可以。 外循环转向内循环，反之则可以。
例：根据用户输入 根据用户输入 的成绩， 的成绩，评定学生 的成绩等级。 的成绩等级。
4.2 选择结构
2. Select语句 语句
Select Case <测试表达式 测试表达式> 测试表达式 [Case <条件表达式 条件表达式1> 条件表达式 [ <语句块 ] ] 语句块1> 语句块 [Case <条件表达式 条件表达式2> 条件表达式 [ <语句块 ] ] 语句块2> 语句块 …… [Case <条件表达式 条件表达式n> 条件表达式 [ <语句块 ] ] 语句块n> 语句块 [Case Else [ <语句块 语句块n+1> ] ] 语句块 End Select
4.3 循环结构
2. For … Next循环 循环
格式： For < 循 环 变 量 > = < 初 值 > To < 终 值 > [ Step步长 步长] 步长 [循环体 循环体] 循环体 [Exit For] Next [循环变量 循环变量] 循环变量 For x = 1 to 50 Step 1 sum = sum + x 例如： Next x
结束
4.3 循环结构
3. 循环的嵌套
在一个循环中又完整地包含另一个循环 对于循环的嵌套，要注意以下事项： 对于循环的嵌套，要注意以下事项： （1）内循环变量与外循环变量不能同名； ）内循环变量与外循环变量不能同名； （2）外循环必须完全包含内循环，不能交叉； ）外循环必须完全包含内循环，不能交叉； （3）不能从循环体外转向循环体内，也不能从 ）不能从循环体外转向循环体内， 外循环转向内循环，反之则可以。 外循环转向内循环，反之则可以。
例：根据用户输入 根据用户输入 的成绩， 的成绩，评定学生 的成绩等级。 的成绩等级。
4.2 选择结构
2. Select语句 语句
Select Case <测试表达式 测试表达式> 测试表达式 [Case <条件表达式 条件表达式1> 条件表达式 [ <语句块 ] ] 语句块1> 语句块 [Case <条件表达式 条件表达式2> 条件表达式 [ <语句块 ] ] 语句块2> 语句块 …… [Case <条件表达式 条件表达式n> 条件表达式 [ <语句块 ] ] 语句块n> 语句块 [Case Else [ <语句块 语句块n+1> ] ] 语句块 End Select
4.3 循环结构
2. For … Next循环 循环
格式： For < 循 环 变 量 > = < 初 值 > To < 终 值 > [ Step步长 步长] 步长 [循环体 循环体] 循环体 [Exit For] Next [循环变量 循环变量] 循环变量 For x = 1 to 50 Step 1 sum = sum + x 例如： Next x
916035-Visual Basic大学应用教程-VB课件第4章
5
VB程序设计与数据库应用
4.1.4 多分支语句（Select Case语句）
在某些情况下，对某个条件判断后可能出 现多种取值的情况，需要使用多分支选择 结构语句来完成。
在多分支结构中，只有一个用于判断的表 达式，根据表达式的不同计算结果，执行 不同的语句序列。
6
VB程序设计与数据库应用
4.2 循环结构程序设计
选择结构能根据指定条件的当前值在两条或多
条程序路径中选择一条执行，它为处理多种复
杂情况提供了便利条件。VB中选择结构语句
包含If语句和Select Case语句两种。
2
VB程序设计与数据库应用
4.1.1 单行If语句
单行结构条件语句，是一种双分支选择结构其格 式为： If<条件>Then<语句序列1> [Else<语句序列2>
4
VB程序设计与数据库应用
4.1.3 IIf函数
IIf 函 数 可 用 来 执 行 简 单 的 条 件 判 断 操 作 ， 它 和 “If…Then…Else”语句有类似的功能。格式为： Iif (<条件>，<True部分>， <False部分>)
其中“条件”是一个逻辑表达式。当“条件”为真 时，IIf函数返回“True部分”，若“条件”为假， 则 返 回 “ False 部 分 ” 。 这 里 “ True 部 分 ” 和 “False部分”可以是表达式、变量或其他函数。
Sub过程和Function过程 过程参数的传递和过程的嵌套。
15
VB程序设计与数据库应用
4.4.1 Sub 过程
在程序设计中，如果某个功能的程序段需要多 次重复使用，可把这个程序段独立出来组成一个 程序，叫子程序，也称为子过程。
VB-第4章-VB语言基础
基本数据类型： ① 数值数据类型：包括整型、长整型、单精度浮点型、双精 度浮点型和货币型 ② 字符数据类型：包括定长字符串和不定长字符串 ③其它数据类型：包括字节型、布尔型、日期型和对象类型 ④变体数据类型
பைடு நூலகம் 具体数据类型分析
几点说明：
❖ 1）未声明时： ❖ VB中对没有声明的变量其缺省的数据类型是变
第四章 数据、表达式、简单程序设计
勤奋
内容
1
程序组织、语言规范
2
数据类型和变量
3
运算符和表达式
4
公共函数、MsgBox
第一节 程序组织、语言规范
勤奋
4.1 VB程序代码的组织方式
❖ 一个VB程序由两部分组成： ▪ 窗体界面设计 ▪ 程序代码设计
这两部分的关系： 程序代码的设计为了将窗体界面上 的控件联系在一起。
局部变量、模块级变量和全局变量。
过程
窗体或模块 工程
变量的说明语句为： Dim <变量名1> [As <类型1>][,<变量名2 [As <类型2>]]…… Public Private Static
局部变量
❖ 在一个过程内部用Dim或Static声明的变量称为局部变量。 这种变量只能在本过程中有效。
2001年秋季题目
牛刀小试----课后习题
下列哪些（ ）是合法的变量名？多选
A）blnFrag B） _a5b C）lngNum D）Area_Triangle E）User&Input F） 5Name
2001年秋季题目
变量的作用域
VB应用程序中进行数据处理离不开变量。变量根据所处的位置或被定义 不同，其作用范围也不同。
பைடு நூலகம் 具体数据类型分析
几点说明：
❖ 1）未声明时： ❖ VB中对没有声明的变量其缺省的数据类型是变
第四章 数据、表达式、简单程序设计
勤奋
内容
1
程序组织、语言规范
2
数据类型和变量
3
运算符和表达式
4
公共函数、MsgBox
第一节 程序组织、语言规范
勤奋
4.1 VB程序代码的组织方式
❖ 一个VB程序由两部分组成： ▪ 窗体界面设计 ▪ 程序代码设计
这两部分的关系： 程序代码的设计为了将窗体界面上 的控件联系在一起。
局部变量、模块级变量和全局变量。
过程
窗体或模块 工程
变量的说明语句为： Dim <变量名1> [As <类型1>][,<变量名2 [As <类型2>]]…… Public Private Static
局部变量
❖ 在一个过程内部用Dim或Static声明的变量称为局部变量。 这种变量只能在本过程中有效。
2001年秋季题目
牛刀小试----课后习题
下列哪些（ ）是合法的变量名？多选
A）blnFrag B） _a5b C）lngNum D）Area_Triangle E）User&Input F） 5Name
2001年秋季题目
变量的作用域
VB应用程序中进行数据处理离不开变量。变量根据所处的位置或被定义 不同，其作用范围也不同。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
构不需要End If。
（3）ElseIf子句数量没有限制。
流程图
例4.3 例4.4 例4.5
例4.2.1 例4.2.2
4.2 块结构条件语句
语句格式
代替单行结构 条件语句
代替单行结构条件语句
块结构条件语句省略ElseIf子句和Else子句， 简化为：
If < 条件 > Then < 语句块 >
End If 可以代替单行结构条件语句。
x^3 求分段函数y= x^2
x
4.2 块结构条件语句
例4.2.2
x0 0≤x10 的值. 10≤x
动态演示
4.2 块结构条件语句
语句格式 代替单行结构
条件语句
例4.3
例4.3 鸡兔同笼。已知笼中有H个头，F只脚， 试编程求笼中有鸡、兔各多少只？
分析: 设笼中有鸡J只，兔有T只，依题意列方程组如下：
4.2 块结构条件语句
语句格式
代替单行结构 条件语句
If < 条件1 > Then < 语句块1> [ ElseIf < 条件2 > Then < 语句块2 > ]
…… [ Else < 语句块n > ]
End If
语句格式
（1）“语句块”中的语句不能与其前面的Then写
在同一行上。
（2）块结构语句必须以 End If 结束，而单行结
分析: 三个数能构成三角形的三条边长的充分必
要条件是： (1)三个数均大于0； (2)任意两条边的和大于第三边。
4.2 块结构条件语句
语句格式 代替单行结构
条件语句
例4.5
例4.5 设计一程序，从键盘输入学生分数， 统计学生总人数和各分数段人数，即优秀(90 —100分)、良好(80—89分)、中等（70— 79 分）、及格（60—69分）和不及格（59分以 下）的人数。
分析: 使用多分支的块结构条件语句可以完成统计。
语句格式 代替单行结构
条件语句
4.2 块结构条件语句
例4.2.1
输入三角形的三条边长，则求这个三角形的面 积，如不能构成三角形则打印相应的错误信息。
分析：三个数能构成三角形的三条边长的充分 必要条件是：
(1)三个数均大于0； (2)任意两条边的和大于第三边。
动态演示
语句格式 代替单行结构
条件语句
T+J=H 4T +2J = F 解方程组得：T = F / 2 - H J = 2H - F / 2 从上面解的表达式可看到，如果要保证T和J是 非负的整数解，F必须是偶数，H是整数，而且要满 足：2 H ≤ F ≤4 H 。
4.2 块结构条件语句
语句格式 代替单行结构
条若这三个数能构 成三角形的三条边长，则求这个三角形的面积； 否则打印相应的错误信息。