《教学PPT基本控制结构(1).ppt》由会员分享，可在线阅读，更多相关《教学PPT基本控制结构(1).ppt（45页珍藏版）》请在三一办公上搜索。
1、2023年2月21日星期二,安徽工业大学计算机学院,1,第四章基本控制结构,一、顺序结构二、分支结构三、循环结构,一、顺序结构,格式：=功能：先计算赋值号(=)右边表达式的值，再将其值赋给左边的变量或对象的属性,赋值语句,一、顺序结构,1.1 赋值语句是VB顺序结构中常用语句，通常有以下三种形式给变量赋值给对象的属性赋值给对象赋值,一、顺序结构,1.1.1.给变量赋值,Dim x as integerDim y as String,z as StringX=23*sqr(9)X=x+1Y=“Welcome to use Visual Basic”Z=y,一、顺序结构,1.1.2.给对象属性赋值
2、,基本格式：对象名.属性名=属性值，例如：Form1.Caption=“第一个VB程序”Command1.Caption=“退出”Text1.Text=Text2.Text,一、顺序结构,1.1.3.给对象属性赋值,即把一个对象的引用赋值给另外一个同类型的对象变量，一般格式为：Set 对象名=对象的引用,一、顺序结构,1.2.Print方法,通常用于窗体对象与Picture对象，输出字符串或图形，具体用法见第二讲窗体部分内容。,1.3.Format函数,通常指定字符串或数字的输出格式。语法如下：X=Format(待输出内容,输出格式),一、顺序结构,1.3.Format函数,例1.格式化日期型
3、数据Dim MyTime as DateMyTime=#15:03:21#Form1.print format(MyTime,“h:m:s”)输出内容为 15:3:21Form1.print format(MyTime,”hh:mm:ss AMPM”)输出内容为 03：03：21 PM,一、顺序结构,1.3.Format函数,例2.格式化数字输出Dim MyString as StringMyString=format(5459.4,”#,#0.00”)5,459.00MyString=format(334.9,”#0.00”)334.90MyString=format(5,”0.00%”)5
4、00.00%,一、顺序结构,1.3.Format函数,常用日期格式字符串,一、顺序结构,1.3.Format函数,常用数字格式字符串,1.3.Format函数,利用Format函数显示有关的日期和时间。Private Sub Form_Click()FontSize=12 MyTime=#9:21:30 PM#MyDate=#7/21/1997#Print Tab(2);Format(MyDate,m/d/yy)Print Tab(2);Format(MyDate,mmmm-yy)Print Tab(2);Format(MyTime,h-m-s AM/PM)Print Tab(2);Forma
5、t(MyTime,hh:mm:ss A/P)Print Tab(2);Format(Date,dddd,mmmm,dd,yyyy)Print Tab(2);Format(Now,yyyy年m月dd日 hh：mm)Print FormatDateTime(Now)VB6.0新提供的函数End Sub,一、顺序结构,1.4 InputBox()函数,InputBox()函数显示一个能够接受用户输入的对话框，并返回用户在对话框中输入的信息。其语法格式为：,InputBox(，标题，缺省，x 坐标，y坐标位置),一、顺序结构,1.4 InputBox()函数,实例：在窗体单击事件中添加如下代码：Dim
6、 sName As String*40sName=InputBox(“请输入你的姓名”+vbCrLf+“然后单击确定:,姓名输入,张三)Form1.Print sName,一、顺序结构,1.5 MsgBox()函数,消息框常用于在程序运行过程中显示一些提示性信息，或要求用户对某个问题进行选择判断。消息框MsgBox的使用方式有语句方式和函数方式两种 函数方式如下：返回值=MsgBox(,对话框类型,标题),一、顺序结构,1.5 MsgBox()函数,消息框MsgBox实例：在窗体单击事件中添加如下代码：Dim a as integerA=msgbox(“请你首先注册”,1+16+256+0,”
7、msgbox例子“)Print a,一、顺序结构,1.5 MsgBox()函数,相关参数说明：是必选项，不可省略。是一个整型表达式，它决定了消息框中按钮的数目和类型以及出现在消息框上图标类型，具体含义见右图：,返回值=MsgBox(,对话框类型,标题),一、顺序结构,1.5 MsgBox()函数,相关参数说明：是一个字符串或字符表达式，被显示在消息框的标题区，若省略之，则标题区显示运行的程序名称。MsgBox()的返回值记录了用户在消息框中选择了哪一个按钮，具体值含义如右图示：如果省略了某些可选项，则必须加入相应的逗号分隔符。,返回值=MsgBox(,对话框类型,标题),一、顺序结构,1.5
8、MsgBox()函数,相关参数说明：在使用MsgBox输出消息框时，有时候不需要返回值。此时可以使用MsgBox语句实现，其格式如下：MsgBox,对话框类型,标题注意：当MsgBox作为语句使用时，不可以使用括号，也不能够获取用户在弹出窗口中单击的按钮。,二、分支结构,2.1 简单分支语句,语法格式：(1).IF THEN END IF(2).IF THEN,二、分支结构,2.1 简单分支语句,程序举例已知两个数x和y，比较它们的大小，使得x大于y.If xy Then t=x x=y y=t End If 或 If xy Then t=x:x=y:y=t,二、分支结构,2.2 双分支语句,
9、语法格式：If Then Else End IfIf Then Else,二、分支结构,2.2 双分支语句,举例：计算分段函数值:,单分支结构实现：y=cos(x)x3+3*x If x0 Then y=sin(x)+sqr(x*x+1),双分支结构实现：If x0 Then y=sin(x)+sqr(x*x+1)Else y=cos(x)x3+3*x End If,二、分支结构,2.3 IF语句嵌套,If语句的嵌套是指If或Else后面的语句块中又包含If语句。形式如下：If Then IF THEN END IF Else End If,二、分支结构,2.3 IF语句嵌套,例 已知x，y，
10、z三个数，使得xyz用一个IF语句和一个嵌套的IF语句实现,If xy Then t=x:x=y:y=t If yz Then t=y:y=z:z=t If xy Then t=x:x=y:y=t End If End If,If语句的嵌套注意事项：书写锯齿型；If 与End If 配对。,二、分支结构,2.4 多分支结构,1、IfThenElseIf语句(多分支结构)语法形式：If Then ElseIf Then Else 语句块 n+1 End If,二、分支结构,2.4 多分支结构,IfThenElseIf语句示例已知百分制成绩mark，显示对应的五级制成绩。哪些正确，哪些错误？,二、
11、分支结构,2.4 多分支结构,2、Select Case语句(情况语句)语法形式：Select Case 变量或表达式 Case 表达式列表1 语句块1 Case 表达式列表2 语句块2 Case Else 语句块n+1End Select,数值型或字符串表达式,：是与同类型的下面四种形式之一：表达式 A枚举表达式(用逗号分隔)2,4,6,8 表达式1 To 表达式2 60 To 100Is 关系运算符表达式 Is 60,二、分支结构,2.4 多分支结构,变量strC中存放了一个字符，判断该字符类型。用多分支结构实现：If strC=0 And strC=A And Ucase(strC)=Z
12、 Then Print strC+是字母字符 Else Print strC+其他字符 End If用Select Case语句实现:Select Case strCCase a To z，A To ZPrint strC+是字母字符Case 0 To 9Print strC+是数字字符Case ElsePrint strC+其他字符 End Select,二、分支结构,2.5 条件函数,IFF函数语法形式：IIf（表达式，当表达式为True时的值，当表达式为False时的值）例如，求x,y中大的数，放入Tmax变量中，语句如下：Tmax=IIf（x y，x，y）,二、分支结构,2.5 条件函
13、数,2.Choose函数语法形式：Choose（数字类型变量，值为1的返回值，值为2的返回值，),例如，Nop是1-4的值，转换成+、-、运算符的语句如下：Op=Choose（Nop，+，-，）当值为1，返回字符串“+”，然后放入Op变量中，值为2，返回字符串“-”，依次类推；当Nop是1-4的非整数，系统自动取Nop的整数办法在判断；若Nop不在14之间，函数返回Null值。,二、分支结构,分支结构综合示例,由计算机来当一年级的算术老师，要求给出一系列的110的操作数和运算符，学生输入该题的答案，计算机根据学生的答案判断正确与否，当结束时给出成绩。分析:产生110操作数，可通过Int(10*
14、Rnd+1)实现,设置的控件名 Label1 Text1 Picture1,Command1,三、循环结构,循环结构三要素：,1.初始化：决定循环的初始状态,2.循环体：即循环中反复执行的语句块,3.循环的条件：即决定循环何时结束,三、循环结构,3.1 FoxNext循环(一般用于循环次数已知),语法格式：For 循环变量初值 to 终值 Step 步长 语句块Exit For 语句块 Next 循环变量,循环体,循环变量,=,终值,语句块,Exit For,语句块,循环变量加步长,T,F,循环变量得初值,T,循环体,三、循环结构,FoxNext循环示例,计算1100的奇数和，程序段如下：Di
15、m i%,s%s=0 For i=1 To 100 step 2 s=s+i Next i,2023年2月21日星期二,安徽工业大学计算机学院,36,0 初值终值=0 死循环,循环次数,注意：出了循环，循环控制变量值的问题。例程序段：For i=2 To 13 Step 3 循环执行次数 Print i,输出 i的值分别为:2 5 8 11 Next i Print:Print“I=“,i 出了循环输出为:I=14,步长,步长,0 初值终值=0 死循环,步长,循环次数,注意：出了循环，循环控制变量值的问题。例程序段：For i=2 To 13 Step 3 循环执行次数 Print i,输出
16、i的值分别为:2 5 8 11 Next i Print:Print“I=“,i 出了循环输出为:I=14,三、循环结构,FoxNext循环示例1,例 改变循环控制变量对循环的影响。Private Sub Command1_Click()j=0 For i=1 To 20 Step 2 i=i+3 j=j+1 Print 第;j;次循环i=;i Next i Print 退出循环后i=;i End Sub正常情况：i=1,3,5,7,9,11,13,15,17,19现在：i=4,9,14,19是由于i=i+3语句造成的.,三、循环结构,FoxNext循环示例2,例 输出可打印的ASCII码字符
17、与它的编码值。,2023年2月21日星期二,安徽工业大学计算机学院,39,3.2.DoLoop循环语句(用于控制循环次数未知)前测式形式：Do While|Until 语句块 Exit Do 语句块 Loop,后测试形式2：Do 语句块 Exit Do 语句块Loop While|Until,三、循环结构,DoLoop循环示例1,我国有13亿人口，按人口年增长0.8%计算，多少年后我国人口超过26亿。分析：解此问题两种方法，可根据公式：26=13*(1+0.008)n 直接利用标准对数函数求得；也可利用循环求得,三、循环结构,DoLoop循环示例2,用辗转相除法求两自然数m，n的最大公约数和最
18、小公倍数。,分析：求最大公约数的算法思想：(1)对于已知两数m，n，使得mn；(2)m除以n得余数r；(3)若r=0，则n为最大公约数结束；否则执行(4)；(4)mn，nr，再重复执行(2)。例 求 m=14,n=6 的最大公约数.,If m 0)m=n n=r r=m mod n Loop Print 最大公约数=,n,m n r 14 6 2 6 2 0,m n r 14 6 2 6 2 0,If m 0)m=n n=r r=m mod n Loop Print 最大公约数=,n,m n r 14 6 2 6 2 0,三、循环结构,3.3 WhileEnd循环,语法格式：While 语句块
19、Exit While 语句块 Wend,循环体,循环体,三、循环结构,3.4 循环的嵌套,注意事项：内循环变量与外循环变量不能同名；外循环必须完全包含内循环，不能交叉；不能从循环体外转向循环体内，反之则可以。,一个循环体内又包含了一个完整的循环结构称为循环的嵌套,三、循环结构,3.4 循环的嵌套,判断以下嵌套循环的正误：,For ii=1 To 10 Next ii For ii=1 To 10 Next ii,For ii=1 To 10 For jj=1 To 20 Next ii Next jj,For ii=1 To 10 For ii=1 To 20 Next ii Next ii,
20、For ii=1 To 10 For jj=1 To 20 Next jj Next ii,For ii=1 To 10 Next ii For ii=1 To 10 Next ii,For ii=1 To 10 For jj=1 To 20 Next ii Next jj,For ii=1 To 10 For jj=1 To 20 Next jj Next ii,For ii=1 To 10 For ii=1 To 20 Next ii Next ii,For ii=1 To 10 Next ii For ii=1 To 10 Next ii,For ii=1 To 10 For jj=1 To 20 Next ii Next jj,For ii=1 To 10 For jj=1 To 20 Next jj Next ii,三、循环结构,循环的嵌套示例-打印九九乘法表.,For i=1 To 9 For j=1 To i se=i Next j Picture1.Print Next i,
