1、第4章 基本控制结构,本章要点： 一、程序结构和编码规则 二、顺序结构 三、选择结构 四、循环结构 五、辅助控制语句 六、综合应用/常用控件,3,一、 程序结构和编码规则,本章目录,4,编码规则 (1) VB.NET代码不区分字母的大小写关键字首字母自动转换成大写，其余字母转换成小写。 用户自定义的变量、过程名，以第一次定义的为准，以后输入的自动向首次定义的形式转换。 (2) 语句书写自由 一行上可书写多句语句(用冒号分隔)，一行最多255个字符。 单行语句可分若干行书写，在本行后加入续行符(空格和下划线)。,本章目录,5,二、 顺序结构,VB具有结构化程序设计的三种程序控制结构，即顺序结构、
2、选择结构、循环结构，是程序设计的基础。,本章目录,（1）顺序结构各语句按出现的先后次序执行,用传统流程图表示为,6,（2）选择结构,传统流程图:,根据条件决定执行的语句,7,（3）循环结构,I 、 当型循环结构,II 、直到型循环结构,根据条件重复执行语句(称为循环体),8,1. 顺序结构一般程序设计语言中顺序结构的语句主要:赋值语句和 输入/输出语句等。在VB.net中赋值语句输入/输出通过:文本框控件、标签控件、InputBox函数、MsgBox函数Write方法,9,(1) 赋值语句,形式： 变量名表达式对象名. 属性名=表达式 功能：计算表达式的值，再将此值赋给变量或对象属性。 给变量
3、赋值和设定属性是VB编程中常见的两个任务. 例如： x!=0.1 x为单精度变量，赋值0.1 TextBox1.Text “ 清除文本框的内容 TextBox1.Text “欢迎使用VB.Net “,本章目录,10,(2)复合赋值语句,复合赋值运算符，其作用简化程序代码，提高程序编编译的效果。语句形式：变量名 复合赋值运算符 表达式 首先计算右边表达式的值，然后与左边的变量进行相应的运算，最后赋值给变量。 复合赋值运算符：+=、- =、*=、=、/=、=、&= 例如：a *= b+4 等价于 a = a*(b+4),本章目录,11,常用复合赋值语句,累加 sum +=x 等价于 sum = s
4、um+x 计数 n += 1 等价于 n = n+1 显示多行信息 利用 &= 来实现 如下语句，TextBox1显示结果？ TextBox1.Text = “ VB.NET “ & vbCrLf TextBox1.Text &= “程序设计教程“,本章目录,12,赋值语句注意点,“=”符号有两个意义赋值号、关系运算符等号形式相同,系统会根据所处的位置判断符号的意义。赋值号左边只能是变量，不能是常量、常数符号、表达式。下面均为错误的赋值语句： Now()=x+y 左边是表达式(函数) 5=sqrt (s)+x+y 左边是常量 X+y=z 左边是表达式,本章目录,13,A. InputBox函数
5、 打开一个对话框，等待用户输入，返回字符串类型的输入值。 形式：InputBox(提示,标题,默认值,x坐标位置,y坐标位置),(3) 数据输出和输入,本章目录,注意:提示项不能省略。 若要多行提示，可在每行 行末加回车换行vbCrLf。,14,打开一个信息框，等待用户选择一个按按钮。MsgBox函数返回所选按钮的值，变量% = MsgBox(提示,按钮,标题)MsgBox函数独立的语句：MsgBox 提示,按钮,标题 按钮项是一整型表达式或枚举值（ MsgBoxStyle) 决定信息框按钮的数目和类型及出现在信息框上的图标形式。 返回结果整型表达式或枚举值（MsgBoxResult枚举），,
6、B.MsgBox函数,本章目录,15,MsgBox按钮设置,本章目录,枚举 MsgBoxStyle,16,MsgBox所选按钮返回值,例 编一账号和密码输入的检验程序，当输入不正确，如账号为非数字字符，密码不正确等，显示有关信息，再输入。,本章目录,代码说明,枚举 MsgBoxRetry,17,三、选择结构,VB中主要通过If条件语句和Select情况语句来实现。它们都是对条件进行判断，根据判断结果，选择执行不同的分支。,本章目录,18,1. If条件语句,(1). IfThen语句(单分支结构)If Then语句块（可以是一句或多句语句）End If 或 If Then 表达式：关系表达式、
7、逻辑表达式，算术表达式。表达式值按非零为True，零为False进行判断。 该语句的作用是当表达式的值为True，执行Then后面的语句块，否则不做任何操作。,本章目录,IF演示,19,单分支结构,例：已知两个数x和y，比较它们的大小，使得x大于y。If xy Thent=xx=yy=tEnd If 或 If xy Then t=x: x=y: y=t 简单If形式无End If时，只能是一句语句或语句间用冒号分隔，而且必须在一行上书写。,本章目录,20,双分支结构,(2). IfThenElse语句 If 表达式 Then语句块1 Else语句块2 End If 或 If 表达式 Then
8、语句1 Else 语句2 当表达式的值为True时，执行Then后面的语句块1，否则执行Else后面的语句块2,本章目录,21,双分支结构例,计算分段函数,单分支 y=cos(x)x3+3*x 结构实现 If x0 Then y=sin(x)+sqrt (x*x+1),If x0 Then双分支 y=sin(x)+sqrt (x*x+1)Else 结构实现 y=cos(x)x3+3*xEnd If,本章目录,22,多分支结构,(3). IfThenElseIf 语句 If 表达式1 Then语句块1ElseIf 表达式2 Then语句块2 Else 语句块 n+1End If,作用：根据不同的
9、表达式值确定执行哪个语句块,本章目录,23,不管有几个分支，依次判断，当某条件满足，执行相应的语句，其余分支不再执行；若条件都不满足，且有Else子句，则执行该语句块，否则什么也不执行。ElseIf不能写成 Else If,本章目录,24,If语句的嵌套是指If或Else后面的语句块中又包含If语 If 表达式1 ThenIf 表达式2 ThenEnd If End If,If xy Then t=x: x=y: y=t If yz Thent=y: y=z: z=t If xy Then t=x: x=y: y=tEnd If End If,If语句的嵌套,例 已知x，y，z三个数，使得xy
10、z 用一个IF语句和一个嵌套的IF语句实现,本章目录,25,2. Select Case语句,Select Case 变量或表达式Case 表达式列表1语句块1Case 表达式列表2语句块2Case Else语句块n+1 End Select,表达式列表与变量或表达式的类型必须相同，是下面4种形式之一 ： 表达式 例: “A“ 一组用逗号分隔的枚举值 2,4,6,8 表达式1 To 表达式2 60 To 100 Is 关系运算符表达式 Is 60,本章目录,26,Select Case语句例,Select Case 语句实字符串的判别：Select Case chCase “a“ To “z“
11、，“A“ To “Z“MsgBox( ch + “是字母字符“)Case “0“ To “9“MsgBox (ch +“是数字字符“)Case ElseMsgBox( ch + “是其他字符“)End Select 多分支结构，用Select Case语句比IfThenElseIf语句直观，程序可读性强。但不是所有的多分支结构均可用Select Case语句代替IfThenElseIf语句。,本章目录,27,Select Case语句例,例 已知坐标点(x，y)，判断其落在哪个象限。,代码一 If x 0 And y 0 ThenMsgBox(“在第一象限“) ElseIf x 0 ThenM
12、sgBox(“在第二象限“) ElseIf x 0 And y 0 ThenMsgBox(“在第四象限“) End If,代码二 Select Case x,yCase x 0 And y 0MsgBox(“在第一象限”)Case x 0MsgBox(“在第二象限”)Case x 0 And y 0MsgBox(“在第四象限”) End Select,代码二错误： 1. Select Case 后不能出现多个变量； 2. Case后不能出现变量及有关运算符。,本章目录,28,3. 条件函数,(1) IIf函数 IIf(表达式，表达式为真时的值，表达式为假时的值) IIf函数是If Then E
13、lse 结构的简洁表示 例如，将x，y中大的数，放入Tmax变量中： Tmax = IIf(x y，x，y) 该语句与如下语句等价 ： If x y Then Tmax = x Else Tmax = y,本章目录,29,(2) Choose函数 Choose(整数表达式，选项列表) 根据表达式的值i,返回选项列表中第i个选项。如果整数表达式的值越出选项范围时，返回Null。 例 根据Nop的值，得到+、-、中的某运算符： Op= Choose(Nop，“+“，“-“，“，“) 例4.8 根据当前日期，显示今日是星期几。 t = Choose(Weekday(Now), “星期日”, “星期一
14、”, “星期二”, “星期三”, “星期四”, “星期五”, “星期六”) MsgBox(“今天是：“ & Now & t),本章目录,Dim nop As Integer, op As Char Randomize() nop = Int(Rnd() * 4 + 1) op = Choose(nop, “+“, “-“, “, “) MsgBox(“nop=“ & nop & “ op=“ & op),30,四、循环结构,计算机最擅长的功能之一就是按规定的条件，重复执行某些操作。 VB中提供了主要的两类循环语句：For循环语句(一般已知循环次数）；Do条件型循环语句(一般未知循环次数).,本
15、章目录,31,1. For循环语句,For循环语句用于控制循环次数预知的循环结构。 For 循环变量 初值 To 终值 Step 步长语句块Exit For语句块 Next 循环变量 循环变量必须为数值型。 循环次数,例4.9 计算1100的奇数和,本章目录,Dim i%, sum% For i = 1 To 100 Step 2sum = sum + i Next i MsgBox(sum),32,For循环语句,循环流程： (1) 循环变量被赋初值，它仅被赋值一次。 (2) 判断循环变量是否在终值内，如果是，执行循环体；如果否，结束循环，执行Next的下一语句。 (3) 循环变量加步长，转
16、(2)，继续循环,例4.10 将可打印的ASCII码制成表格输出,本章目录,33,2. DoLoop循环语句,Do循环用于控制循环次数未知的循环结构。 形式1： Do While|Until 语句块Exit Do 语句块 Loop形式1为先判断后执行，有可能一次也不执行； 形式2为先执行后判断，至少执行一次。,形式2： Do 语句块Exit Do语句块 Loop While|Until ,本章目录,34,DoLoop流程,本章目录,35,循环例题,例 我国有13亿人口，按人口年增长0.8%计算，多少年后我国人口超过26亿。 解此问题两种方法，可根据公式：,直接利用标准函数对数可求得，但求得的年
17、数不为整数；也可利用循环求得 。,本章目录,代码说明,36,循环例题,例 用辗转相除法求两自然数的最大公约数。 求最大公约数的算法思想： (1)对于两数m，n，使得mn (2) m除以n得余数r,例 m=14 ,n=6 的最大公约数 If m 0) m=nn=rr= m mod n Loop MsgBox “最大公约数=” & n,辗转相减法m=m-n mnn=n-m nmm、n为公约数 m=n Do While m n m nIf m n Then 14 6m = m n 8 6Else 2 6n = n m 2 4End If 2 2 Loop,(3)若r=0，则n为最大公约数，结束；否则
18、执行(4) (4)mn，nr，再重复执行(2),本章目录,37,3. 循环的嵌套,在一个循环体内又包含了一个完整的循环结构称为循环的嵌套。循环嵌套对For循环语句和DoLoop语句均适用。 例 打印九九乘法表,思考：打印上三角或下三角程序如何改动？,本章目录,显示星星图* * * * * * * *,39,五、 其他辅助控制语句,1. Go To 语句 无条件地转移到标号或行号指定的那行语句。Go To 标号|行号 注意：标号是字符序列，首字符必须为字母，标号后应有冒号；行号是一个数字序列；2.Continue语句 它不终止不层循环，只是绕过本次循环，开始下一次循环，即它只能跳过循环体中con
19、tinue后面的语句，强行进入下一次循环，相当于本次循环的短路。 相对应于for语句和do的不同，有continue for 和continue do语句的书写形式。,本章目录,40,2. 退出和结束语句,1.Exit语句 VB中有多种形式的Exit语句，用于退出某种控制结构的执行。Exit的形式如下：Exit For、Exit Do、Exit Sub、Exit Function 2.End语句 独立的End语句用于结束一个程序的运行，它可以放在任何事件过程中。,本章目录,41,六、综合应用,1. 自测四则运算 例 由计算机自动产生四则运算题，并能判断答案的正确性。 设计思路： (1)通过随机
20、函数Rnd产生试题的操作数和运算符，运算符+、-、可对应编号14。产生表达式通过Form_Load事件过程。 (2)需要有一个全局变量保存四则运算题的正确答案，用户答案可通过文本框输入。 (3)本题主要将随机函数、If语句、Select语句综合在一起使用。,本章目录,代码说明,42,综合应用-级数求和,例 求自然对数e的近似值，其误差小于0.00001。,近似公式,分析：本例涉及到程序设计中两个重要运算：累加 、连乘i!。 累加：在原有和的基础上再加一个数； 连乘：在原有积的基础上再乘以一个数。 该题先求i!，再将1/i!进行累加，循环次数预先未知，可先设置一个循环次数很大的值，然后在循环体内
21、判断是否到达精度，当然也可用Do While来实现。,本章目录,代码说明,43,综合应用-试凑法,例 百元买百鸡。假定小鸡每只5角，公鸡每只2元，母鸡每只3元，编程求解购鸡方案。 分析： (1) 设母鸡、公鸡、小鸡各为x、y、z，列出方程为：x+y+z= 1003x+2y+0.5z = 100 三个未知数，两个方程，此题求若干个整数解。 (2) 计算机求解此类问题，采用试凑法(也称为穷举法)来实现，即将可能出现的各种情况一一罗列测试，判断是否满足条件，采用循环结构来实现。,本章目录,44,综合应用-递推法,递推(迭代)法基本思想是把一个复杂的计算过程转化为简单过程的多次重复。每次都从旧值的基础
22、上递推出新值，并由新值代替旧值。 例 小猴有桃若干，第一天吃掉一半多一个；第二天吃剩下桃子的一半多一个；以后每天都吃尚存桃子的一半多一个，到第7天只剩一个，问小猴原有桃多少？ 分析：用后一天的数推出前一天的桃子数。设第n天的桃子为xn，是前一天的桃子的二分之一减去1。,迭代法类似的应用求高次方程的近似根。,本章目录,45,*程序调试,随着程序的复杂性提高，程序中的错误也伴随而来。对初学者，看到出现错误不要害怕，关键是如何改正错误，失败是成功之母。 上机的目的，不光是为了验证你编写的程序的正确性，还要通过上机调试，学会查找和纠正错误的方法和能力。VB为调试程序提供了一组交互的、有效的调试工具。,
23、本章目录,46,1. 错误类型,语法错误、运行时错误和逻辑错误三类。1.语法错误,本章目录,47,2.运行错误,指令代码执行了一非法操作引起的。例如，类型不匹配、试图打开一个不存在的文件等。程序会自动中断，并给出有关的错误信息。,本章目录,48,3.逻辑错误,程序运行后，得不到所期望的结果，这说明程序存在逻辑错误。例如，运算符使用不正确、语句的次序不对、循环语句的起始、终值不正确等。通常，逻辑错误不会产生错误提示信息，故错误较难排除，需要程序员仔细地阅读分析程序，并具有调试程序的经验。,本章目录,49,2. 调试和排错,VB.NET的三种模式 (1) 设计模式(设计) 可以进行程序的界面设计、
24、属性设置、代码编写等。 (2) 运行模式(运行) 执行启动命令进入运行模式。在此阶段，可以查看程序代码，但不能修改。 (3) 中断模式(Break) 执行中断命令，进入中断模式。在中断模式下可以查看代码、修改代码、检查数据。,本章目录,50,调试和排错-插入断点,鼠标指向所关心的变量,本章目录,51,本章小节,结构化程序设计三种结构顺序结构、选择结构、循环结构IfThen语句、Select Case语句、For与 Do循环语句 赋值语句与复合赋值语句 数据输出和输入 InputBox、MsgBox 常用算法素数判定、级数求和、试凑法、迭代法解方程,52,思考题,1. 结构化程序设计有哪三种基本结构？ 2. MseBox与InputBox有何区别？ 3.多分支If语句与Select Case语句有何区别？ 4.如果事先不知道循环次数，如何用ForNext结构实现循环？ 5.语法错误、运行时错误和逻辑错误之间有何区别？,本章目录,
