VB语言程序设计课件第4章-VB程序控制结构

1、VB语言程序设计课件第4章-VB程序控制结构VB语言程序设计课件第4章-VB程序控制结构4.1 算法概述应用程序=用户界面+程序代码代码被组织成一个个过程过程分为事件过程和通用过程(第六章)过程=操作规则+对操作对象的说明4.1 算法概述应用程序=用户界面+程序代码4.1 算法概述 算法概念：广义地说，为解决一个问题而采取的方法和步骤。4.1 算法概述算法的特性1.可行性:算法中的每一个步骤都应当能有效地执行，并得到确定的结果。“比如除数不能为0”2.确定性:算法中的每一个步骤都应当是确定的，而不应当是含糊的、模棱两可的。3.有穷性:一个算法应包含有限的操作步骤，而不能是无限的。4.输入性(有

2、零个或多个输入):是指在执行算法时需要从外界取得必要的信息。一个算法也可以没有输入。5. 输出性(有一个或多个输出):算法的目的是为了求解，“解” 就是输出。没有输出的算法是没有意义的。算法的特性1.可行性:算法中的每一个步骤都应当能有效地执行，算法的表示自然语言(汉语、英语)代码符号(VB语言)图形(流程图、PAD图、NS图)算法的表示自然语言(汉语、英语)图形符号表表示与流程图其他部分相连接连接点连接各个图框,表示执行顺序流程线一个定义过的过程特定过程流程的起点和终点起止判断选择,根据条件满足与否选择不同路径判断各种形式的数据处理处理数据的输入和输出输入/输出代表的操作名称图形符号图形符号

3、表表示与流程图其他部分相连接连接点连接各个图框,表示基本算法结构结构化程序设计的三种基本结构:顺序结构选择结构循环结构基本算法结构结构化程序设计的三种基本结构:顺序结构eABTF选择结构n选择结构，或称选取结构，或称分支结构。A或B中可以有一个是空的。顺序结构eABTF选择结构n选择结构，或称选取结补全下面的流程图-开始(结束)输入(输出)补全下面的流程图-开始(结束)输入(输出) 循环结构当型(While型)循环结构直到型(Until型)循环 循环结构当型(While型)循环结构直到型(Unti三种基本结构共同特点：(1) 只有一个入口。(2) 只有一个出口。（注意，一个菱形判断框有两个出口

4、，而一个选择结构只有一个出口。）(3)无死语句（永远执行不到的语句）。(4) 无“死循环”(永远执行不完的循环)。三种基本结构共同特点：4.2 顺序结构程序设计按语句出现的次序从上到下执行输入 处理 输出处理输入输出输入信息 计算机 输出信息4.2 顺序结构程序设计按语句出现的次序从上到下执行处理1. 赋值语句用于将指定的值赋给变量或对象属性.n=n+1 将变量n的值加1后的结果再赋给变量n Text1.fontsize=text1.fontsize+5变量或对象属性类型应与表达式类型相容 (x%=11/4 y%=“123.45”). 相容时,将表达式的结果转换为变量的类型,然后再赋给左边的变

5、量.P58课下自行实践*建议自己写程序时尽量不要出现左右类型不符的情况.1. 赋值语句用于将指定的值赋给变量或对象属性.逻辑型(Boolean)数据 Boolean型用于逻辑判断，它只有True和 False两个值。P58例1 布尔与整型的关系逻辑数据整型变量True 转为 -1 False 转为0赋值给整型数据逻辑变量非0数转为 True0 转为 False赋值给Dim b As Boolean, n As Integerb = 1Print bb = 0Print bn = bPrint nb = 3Print bn = bPrint n逻辑型(Boolean)数据例1 布尔与整型的关系逻

6、辑数例2.求梯形面积Val函数功能-将数字字符串转换为数值例2.求梯形面积Val函数功能-将数字字符串转换为数值例3 重点算法：设计算法交换两个变量a和b的值现有两个杯子，分别装有奶茶和水，请交换两个杯子里的液体。输入a和b的值（赋值，随机数，inputbox函数等）交换输出a和b的值（print textBox Msgbox) 思考:如何交换两文本框中信息?如何交换两图片框中图形?例3 重点算法：设计算法交换两个变量a和b的值现有两个杯子，例4 求水仙花数三位正整数各位数字立方和等于该数本身关键:如何获得各位数字?例4 求水仙花数三位正整数与Print方法有关的Tab函数为了使信息按指定的格

7、式输出，VB提供了几个与print配合使用的函数格式：Tab(n) 把光标移到参数n指定的位置开始输出信息。例如：Print Tab(10);25 将在第10个字符位置处输出25例4.2 请大家在VB中输入代码理解Tab与String函数与Print方法有关的Tab函数为了使信息按指定的格式输出，4.3 选择结构对给定的条件进行分析、比较和判断，根据判断结果采取不同的操作。上述问题通过选择结构程序来解决，而选择结构通过条件语句来实现:IF语句和Select Case语句。If语句包括：单分支结构；双分支结构；多分支结构。4.3 选择结构对给定的条件进行分析、比较和判断，根据判断结If语句单分支

8、双分支多分支If语句单分支1.单分支结构 一般形式如下： If e Then 语句块 End If等价于 If e Then End If为区别于单行结构语句的特征.其中e为判断条件, 可以是关系表达式、逻辑表达式、数值表达式或字符串表达式。e语句块TF1.单分支结构 一般形式如下：e语句块TF单分支结构应用 【例1】由键盘输入任一实数，若为负数，则通过消息框提示用户“您输入的是一个负数”。最后在当前窗体中输出用户输入的数值。单分支结构应用 【例1】由键盘输入任一实数，若为负数，则双分支结构一般形式如下：If e Then Else End If等价于If e Then Else 【例2】 输

9、出两整数中的较大数。e语句块1语句块2TF双分支结构一般形式如下：e语句块1语句块2TF3.多分支块结构假如中了50万那么买辆雅阁本田另外假如中了100万那么 买辆宝马另外假如中了400万那么 买辆法拉利另外、反之（没中奖） 天天电动车结束假如3.多分支块结构假如中了50万那么买辆雅阁本田另外假如中了1If Then ElseIf ThenEnd If ElseIf Then Else-应用时根据需要对条件进行增减假如中了50万那么买辆雅阁本田另外假如中了100万那么 买辆宝马另外假如中了400万那么 买辆法拉利另外、反之（没中奖） 天天电动车结束假如多分支块结构If Then ElseIf

10、Th多分支结构应用【例3】给定一个百分制成绩的分数，编程实现显示对应的五级制成绩。20 , Is20 即一个case语句中允许有多个测试项，项与项之间用逗号分隔。本结构执行方式： 先求测试表达式的值，接着逐个检查每个case语句的测试项，如果测试表达式的值满足某个测试项中的任意一个测试内容，系统就执行该case语句下的那组语句,然后执行End Select下面的语句；若没有一个测试项满足要求，就执行Case Else 下的语句。测试项可以是三种形式的组合，如4，7 to 19,Is2 例5: 变量strC中存放了一个字符，判断该字符类型。用Select Case语句实现: Dim strC a

11、s string*1 如何获得strC？ Select Case strCCase a To z，A To ZPrint strC + 是字母字符Case 0 To 9Print strC + 是数字字符Case ElsePrint strC + 其他字符 End Select一个case语句中允许有多个测试项，项与项之间用逗号分隔。 例5: 变量strC中存放了一个字符，判断该字符类型。一个Private Sub Command1_Click() Dim x As Integer x = Val(Text1.Text) Select Case x Case Is 1 Text2.Text =

12、 这是小于1的数 Case 1 To 10 Text2.Text = 这是1到10之间的数 Case Else Text2.Text = 这是大于10的数 End SelectEnd Sub阅读程序，若用户在文本框1中输入了8，文本框2中显示的结果是什么？Private Sub Command1_Click()阅读IF嵌套If .Then If Then else end ifEnd if完成例3的思考题。IF嵌套If .Then3.IIf函数可用来执行简单的条件判断操作，它是“If Then Else”结构的简写版本。 结果=IIF(条件,True部分,False部分)注意，3个参数都不能省略。要求： True部分,False部分及结果变量的类型一致。Print IIf(Combo1.Text = 上午, 上午好, 下午好)3.IIf函数可用