《VB算法的三种模式.ppt》由会员分享，可在线阅读，更多相关《VB算法的三种模式.ppt（19页珍藏版）》请在三一办公上搜索。
1、VB程序中的三种基本结构,顺序结构分支结构循环结构,顺序结构,开 始,刷牙洗脸吃早饭,坐车到学校,6：30起床,分支结构,开始,准备上体育课,Y,在室内上课,在操场上课,循环结构,开始,要交卷吗？,准备考试,Y,结束,交卷,继续答题,程序的三种基本结构练习（看流程图）,开始,i=10,Y,i=1 s=0,N,结束,输出S,i=i+1 S=s+1,练习1、以上流程图属于（）结构,开始,练习2、此流程图属于什么结构？请描述该流程图的含义？,temp a,ab,b temp,提示：1、“”表示“赋值”2、temp、a、b表示变量,开始,练习3、假如你是电费收费员，以下是一个有关每月电费收费问题的流程
2、图（这里不考虑峰谷电），请解释一下收费规则？并说明此图属于什么结构？,练习4：以下程序，当输入a,b,c的值分别为10，20，30时，输出结果为多少？该流程图完成了什么功能？,开始,练习5、当输入n的值为5时，输出s的值为多少？该流程图完成的什么功能？,练习6、将流程图中 改为：流程图的功能一样吗？如果不一样，当n=5时，结果变成多少？,s=s*ii=i+1,i=i+1s=s*i,1、选择语句（即分支结构）,选择语句能使程序在执行过程中，根据不同的判断结果，选择执行不同的处理,1.1、行IF语句,If 条件表达式 Then 语句1 Else 语句2If 条件表达式 Then 语句,注意：1、一
3、个行IF语句必须在一行内写完。2、Then和Else只后只能写一个语句3、没有End If,例证性试题：成绩变量score为数值型变量，当score大于等于60分则文本框对象text1中显示为“及格”，小于60分则显示为“不及格”练习7补充完整：if score=60 then text1.text=“及格”,算法三种结构在VB中的具体实现,1、选择语句（即分支结构）,算法三种结构在VB中的具体实现,选择语句能使程序在执行过程中，根据不同的判断结果，选择执行不同的处理,1.2、块IF语句,IF 条件表达式1 Then语句块1ElseIf 条件表达式2 Then语句块2ElseIf 条件表达式n
4、 Then语句块nElse语句块0End if,注意：1、块IF语句中必须含有End If2、这里n=1，ElseIf和Else语句可以不出现，即：IF 条件表达式 Then 语句块 End If,算法三种结构在VB中的具体实现之,例证性试题：,判断三条线段a,b,c是否能构成三角形的语句，若构成三角形，则label1显示为“yes”,否则label1显示为”no”,练习8补充完整：a=val(text1.text)在文本框1中输入a的值 b=val(text2.text)在文本框2中输入b的值 c=val(text3.text)在文本框3中输入c的值 If label1.captipn=“y
5、es”label1.caption=“no”,2、循环语句,循环语句描述了一种重复计算的过程,2.1、For语句,For语句主要用于循环次数已知的情况。,For 循环变量=初值 To 终值 Step 步长 语句块Next 循环变量,注意：1、语句中没有“step 步长”，则表示默认步长为12、步长可以为正（此时初值终值）,如：1、for i=10 to 1 step-2 S=s+i Next I 程序循环了5次,2、For ste=2 to 10 S=s+1 Next 程序循环了（）次,算法三种结构在VB中的具体实现,2、循环语句,算法三种结构在VB中的具体实现之,例证性试题：1、给出下面程序
6、的运行结果,s=0For i=1 to 10 step 3 S=s+1Next IMsgbox(s),计算过程如下：S=0i=110 循环结束，执行下一语句Msgbox(s)msgbox(x)语句为在屏幕上显示括号里面变量的值答案为：4本程序共循环了（）次,课堂练习1:S=0For k=1 to 10 S=s+kNext运行结束后：S=()K=(),课堂练习2：S=0y=0For i=10 to 1 step-3 s=s+i Y=y+1Next Msgbox(y)运行结束后：S=()Y=()I=(),2.2、Do语句,Do语句用于不能预先知道循环次数，但知道什么时候循环结束的情况,Do Whi
7、le 条件表达式 语句块Loop,说明：先计算条件表达式的值，当值为true时，执行语句块，遇到loop,返回再次计算条件表达式，若仍为值，继续执行语句块，知道条件表达式为假，跳出循环，执行loop语句后面的语句。,例证性试题1：Sum=0d=0Do while d=10 d=d+1 sum=sum+d LoopMsgbox(sum),Sum=0D=010 跳出循环 执行msgbox(sum)结果显示：55,算法三种结构在VB中的具体实现之,算法三种结构在VB中的具体实现（综合练习）,1有如下Visual Basic程序段：a=18 b=12 c=(a-b)*2 该程序段运行后，变量c的值为_
8、。,2有如下Visual Basic程序段：a=5 b=4 c=7 s=a+b If s c Then Label1.Caption=“初检合格“Label1.Caption表示在label1上显示的内容 Else Label1.Caption=重新调试 End If 该程序段运行后，在标签Label1上显示的是_。,算法三种结构在VB中的具体实现（综合练习）,3、有如下程序段：t=1s=0 For i=1 To 10 Step 2 t=t*2 s=t+1 Next i问：（1）程序运行后，变量s 的值为_。（2）程序运行后，语句t=t*2被执行的次数为_。,4、下列Visual Basic程
9、序段运行后，变量s的值为（）。a=2 b=1 s=0 For I=10 To 8 Step-1 s=s+a c=a+b a=b b=c Next I,附加题1、在Visual Basic中程序段是计算（）公式的。s=0 For I=1 To 10 t=1 for j=1 to i t=t*j next j s=s+t Next I A、s=1+2+3+4+5+6+7+8+9+10 B、s=1*2*3*4*5*6*7*8*9*10 C、s=1!+2!+3!+4!+5!+6!+7!+8!+9!+10!D、s=1+2*3+3*4+4*5+5*6+6*7+7*8+8*9+9*10,附加题2有如下Visual Basic程序段：x=10 s=0 i=0 Do While i=x i=i+2 s=s+i Loop问：（1）该程序段运行后，变量s的值为_。（2）循环刚退出时，变量i的值为_。,
