《Visual Basic 6.0程序设计教程（第二版） 曾强聪 第3章 程序结构》由会员分享，可在线阅读，更多相关《Visual Basic 6.0程序设计教程（第二版） 曾强聪 第3章 程序结构（55页珍藏版）》请在金锄头文库上搜索。
1、第3章 程序结构,3.1 程序流程控制 3.2 基于模块建立程序 3.3 过程与函数 3.4 常用内置函数 3.5 面向对象编程,3.1 程序流程控制,3.1.1 分支结构 3.1.2 循环结构 3.1.3 嵌套控制结构,返回首页,3.1.1 分支结构,分支结构的作用是使程序依照条件而走不同的支路。Visual Basic 支持的分支结构有： If.Then. If.Then.Else. Select Case,1If.Then. 语句（如图3-1所示） 用 If.Then 结构可以有条件地执行其结构内的一条或多条语句。 当有条件地执行一条语句时，语法格式： If 条件表达式 Then 单条语
2、句 当有条件地执行多条语句时，语法格式： If 条件表达式 Then 多条语句 End If If.Then.,图3-1 基本分支结构,2If.Then.Else. 语句（如图3-2所示） 可以使用 If.Then.Else.语句建立多个分支流程，并根据条件选择其中一个分支。其语法结构是： If 条件1 Then 语句块1 ElseIf 条件2 Then 语句块2 . Else 语句块n End If,图3-2 扩充分支结构,图3-3 多分支结构,3Select Case 语句（如图3-3所示） Select Case的语法结构是： Select Case 测试条件 Case 表达式1 语句块
3、1 Case表达式2 语句块2 Case Else 语句块n End Select,返回本节,3.1.2 循环结构,循环的作用是允许某个程序段被重复执行。Visual Basic 支持的循环结构有： DoLoop ForNext For Each.Next,1Do.Loop 循环 Do.Loop 语句是通过计算条件表达式以决定是否继续循环。其中，条件必须是一个值为 True（非零）或 False（零）的表达式。 形式一： Do While 条件表达式 +语句块 Loop 形式二： Do 语句块 Loop While 条件表达式,图3-4 Do While .Loop循环,图3-5 Do .Lo
4、op While循环,表3-1 DoLoop的其他两种形式,2For.Next 循环 For 循环的语法如下： For 计数器 = 初始值 To 终止值 Step 增量 语句块 Next 计数器 其中，参数计数器、初始值、终止值和增量都必须是数值型的变量。,3For Each.Next循环 语法格式是： For Each 元素 In 集合 语句块 Next 元素,4中途退出循环 从Do.Loop中退出的语句是： Exit Do 从For循环中退出的语句是： Exit For 一般情况下，Exit Do或Exit For是嵌在分支语句中使用的。,返回本节,3.1.3 嵌套控制结构,嵌套控制结构就
5、是把控制结构放入另一个控制结构之内，例如在 For.Next 循环块中放入 If.Then. 块。在 Visual Basic 中，控制结构的嵌套层数没有限制。,返回本节,3.2 基于模块建立程序,在Visual Basic中，基本模块是以文件形式体现的，有3种类型：标准模块、窗体模块和类模块，可以把它们看作为文件级模块。文件级模块中包含有：过程、函数、属性、方法、事件等内容，可以把它们看作为单元级模块。 （1）程序按功能执行步骤划分成诸多语句块。 （2）对于每个逻辑语句块应该给出必要注释，由此使程序更加便于理解。 （3）程序中的逻辑语句块的划分往往和程序的流程控制结构有关。,返回首页,3.3
6、 过程与函数,3.3.1 通用过程 3.3.2 函数过程 3.3.3 事件过程 3.3.4 调用其他模块中的公用子过程 3.3.5 过程编辑的可视化工具 3.3.6 向过程传递参数的方法及规则,返回首页,3.3.1 通用过程,定义通用过程的语法是： Private|PublicStatic Sub 过程名 (形式参数列表) 语句块 End Sub 调用通用过程的语法是： Call 过程名(实际参数列表) 或： 过程名 实际参数列表,图3-6 例3-8设计窗体,返回本节,3.3.2 函数过程,函数过程的语法是： Private|PublicStaticFunction 函数名 (形式参数列表)
7、As 类型 语句块 End Function 调用函数过程的基本语法是： 变量 = 函数名(实际参数列表),图3-7 例3-9设计界面,返回本节,3.3.3 事件过程,事件过程可以在“代码编辑器”窗口中创建。通过从“代码编辑器”的“对象框”中选择一个对象，从“过程框”中选择一个过程，可以获得一个事件过程模板，如图3-8所示。定义事件过程的语法如表3-2所示。 Visual Basic程序设计是基于事件的。因此，创建事件过程也就成为了建立应用程序时的一项主要任务。其中，事件过程和通用过程、函数过程的关系如图3-9所示。事件过程与通用过程具有相同的定义格式。因此，事件过程也可以当作通用过程在程序中
8、使用语句调用。,图3-8 在“代码编辑器”中创建事件过程,表3-2 定义事件过程语法,图3-9 事件过程对通用过程、函数过程的调用,返回本节,3.3.4 调用其他模块中的公用子过程,窗体模块、类模块中的公用子过程是作为该窗体对象的方法存在的，它们是封装后的对象提供给外部的与操作有关的通信接口，因此，外部调用时需要通过包含此过程的对象来引用。 标准模块中的公用过程是结构化功能子模块，如果过程名是惟一的（如果过程仅出现在一个地方，这个过程就是惟一的），则不必在调用时加模块名。,返回本节,3.3.5 过程编辑的可视化工具,1添加过程对话框 通过菜单命令“工具添加过程”打开添加过程对话框，如图3-10
9、所示。 2代码编辑窗 通过菜单命令“视图代码窗口”或“工程资源管理器”上的“查看代码”按钮可以打开所选模块的“代码编辑窗”。,图3-10 通过“添加过程”对话框创建过程,返回本节,3.3.6 向过程传递参数的方法及规则,1按值传递参数（如图3-11所示） 2按地址传递参数（如图3-12所示） 3使用可选的参数（如图3-14、3-15所示） 4使用不定数量的参数,图3-11 按值传递不会改变实际参数的值,图3-12 按地址传递将会影响实际参数的值,图3-14 忽略可选参数时的结果,图3-15 选取可选参数时的结果,返回本节,3.4 常用内置函数,3.4.1 数学函数 3.4.2 字符串函数 3.
10、4.3 转换函数 3.4.4 判断函数 3.4.5 其他函数,返回首页,3.4.1 数学函数,数学函数主要用来完成数学运算，常用的有以下几个： （1）Sin(x)：返回X的正弦值，X的单位为弧度。 （2）Cos(x)：返回X的余弦值，X的单位为弧度。 （3）Tan(x)：返回X的正切值，X的单位为弧度。 （4）Atan(x)：返回X的反正切值，返回值单位为弧度。 （5）Log(x)：返回X的自然对数。 （6）Exp(x)：返回以e为底的X的指数值。,（7）Sqrt(x)：返回参数X的平方根值。 （8）Abs(x)：返回X的绝对值。 （9）Hex(x)：以字符串形式返回X的十六进制值。 （10）
11、Oct(x)：以字符串形式返回X的八进制值。 （11）Rnd(x)：产生一个介于01之间的单精度随机数。 （12）Int(x)：去掉小数部分，返回整数。 （13）Fix(x)：该函数和Int(x)类似，去掉小数部分，返回整数。,返回本节,3.4.2 字符串函数,（1）InStr(起始位置,字符串1,字符串2,比较类型)：根据比较类型模式确定字符串2在字符串1中第一次出现的位置。 （2）InStrRev(字符串1,字符串2起始位置,比较类型)：与InStr()函数功能相似，只是从字符串1的后面开始向前查找。 （3）LTrim(字符串)：去掉字符串左边的空白部分。 （4）Rtrim(字符串)：去掉
12、字符串右边的空白部分。,（5）Trim(字符串)：去掉字符串的左右空格，若为Null时，返回Null。 （6）Left(字符串,个数)：取出字符串左边指定个数的字符，若个数大于或等于字符串长度，全取。 （7）Right(字符串,个数)：取出字符串右边指定个数的字符，若个数大于或等于字符串长度，全取。 （8）Mid(字符串,起始位置,个数)：取字符串由起始位置开始的指定个数的字符。 （9）Len(字符串或字符变量)：计算字符长度，若字符串为空时，返回Null。,（10）Ucase(字符串)：将字符串的小写字母转换为大写字母，其他字符不变。 （11）Lcase(字符串)：将字符串中的大写字母转换为
13、小写字母。 （12）Space(个数)：返回指定个数的空字符串。 （13）String(个数,字符)：返回包含重复字符的字符串，长度由“个数”指定。 （14）StrComp(字符串1,字符串2,比较类型)：按比较类型比较两个字符串，返回值为：相等时为0；小于时为1；大于时为1。 （15）StrReverse(字符串)：将给定字符串逆序输出。若为空串，返回空串，若为Null，则会出错。,返回本节,3.4.3 转换函数,转换函数一般用来实现不同类型数据之间的转换。Visual Basic 提供的常用转换函数有以下几个。 （1）Str（数值表达式）：把数值转换为字符串。 （2）Val(字符串)：把字
14、符串转换为数字数值，忽略字符串中的非数字字符。,返回本节,3.4.4 判断函数,（1）IsArray(变量名)：判断变量是否为数组，返回Boolean值。 （2）IsDate(表达式)：判断表达式是否为日期，返回Boolean 值。 （3）IsEmpty(变量)：判断变量是否已被初始化。 （4）IsNumeric(表达式)：判断表达式是否为数字型。 （5）Iff(表达式,真部分,假部分)：计算真假两部分的值，再计算表达式的值。,返回本节,3.4.5 其他函数,（1）Date：取当前系统日期。 （2）Time：取当前系统时间。 （3）Hour：返回023之间的整数，表示一天之中的某一钟点。 （4
15、）Day：返回131之间的整数，表示一个月中的某一日。 （5）Dir(路径,属性)：返回与定义的模式或文件属性匹配的表示文件、目录、文件夹、驱动器卷标的字符串。它支持通配符。,返回本节,3.5 面向对象编程,3.5.1 类与对象 3.5.2 属性、方法与事件 3.5.3 对象之间的关系 3.5.4 使用对象,返回首页,3.5.1 类与对象,1类的概念 “类”所要反映的是一个具有群体特征的事物的数据特征与功能特征。 “类”数据特征被当作为“类”的属性，“类”功能特征被当作为“类”的方法。在 Visual Basic 中，有关类的描述保存在类型库中，可以通过对象浏览器查看。,2对象的概念 对象是“
16、类的实例”，是类的具体化的结果，它对应于个体。通过类的具体化可以得到对象，这意味着：对象可以通过类来定义，其定义内容包括：属性、方法、事件等。 对象是代码与数据的封装。对象可以是应用程序的一部分，也可以是整个应用程序。窗体、窗体上的命令按钮、列表框、数据库、数据库中的表、字段、记录集，以及图像、声音等，它们都可以是对象。,返回本节,3.5.2 属性、方法与事件,1属性 属性体现为对象的数据成员，若属性是公有的，则可以被读取或设置，是对象提供给外部的数据接口。方法体现为对象所具有的行为，若方法是公有的，则能够被外部语句调用，是对象提供给外部的功能接口。 对象属性体现为对象的数据成员。若对象属性是公有的，则可以被读取或设置，它是对象提供给外部的数据接口。对象的诸多特征需要通过其属性体现。 （见图3-16）。,图3-16 对象属性窗口,返回本节,3.5.3 对象之间的关系,1层次关系
