VisualBasic循环结构程序设计.ppt

《VisualBasic循环结构程序设计.ppt》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、计算机软件技术基础VisualBasic程序设计选择结构程序设计：If…Then语句（单分支结构）If...Then…Else语句（双分支结构）If…Then…ElseIf语句（多分支结构）结构SelectCase语句（多分支结构）回顾If…Then…ElseIf语句（多分支结构）结构语句格式：If〈表达式1〉Then〈语句块1〉ElseIf〈表达式2〉Then〈语句块2〉……[Else〈语句块n+1〉]EndIfFTTT……表达式1表达式2表达式nn语句块11语句块2语句块nn语句块n+11F…图多分支结构SelectCase语句（多分支结构）┆┆FTF

2、F表达式表n语句块n+1┆语句块nT表达式表2语句块2T表达式表1语句块1图SelectCase结构格式：SelectCase测试变量或表达式[Case表达式表1[语句块1]][Case表达式表2[语句块2]]……[Case表达式表n[语句块n]][CaseElse[语句块n+1]]EndSelect表达式表有四种形式：一个表达式。如：Case6一组用逗号隔开的枚举值。如：Case1，3，5，7表达式1TO表达式2。如：Case1To10Is<关系运算符><表达式>。如：CaseIs>=80另外，在一个情况语句中，上述四种形式可以混合使用。格式：Selec

3、tCase测试变量或表达式[Case表达式表1[语句块1]][Case表达式表2[语句块2]]……[Case表达式表n[语句块n]][CaseElse[语句块n+1]]EndSelect3.3循环结构程序设计在指定的条件下多次重复执行一组语句。VB中提供了两种类型的循环语句：计数循环语句；条件循环语句。1.Do...Loop循环Do…Loop循环用于事先不知道循环次数的循环结构。此种语句四种语法格式：⑴DoWhile…Loop语句⑵Do…LoopWhile语句⑶DoUntil…Loop语句⑷Do…LoopUntil语句格式：DoWhile〈条件表达式〉〈循

4、环体〉Loop⑴.DoWhile…Loop语句TF条件循环体图DoWhile…Loop语句流程图说明：①条件表达式可以是一个逻辑表达式，也可以是一个关系表达式，其值应是逻辑型。②DoWhile和Loop应成对出现。③循环体中要有控制循环的语句，以避免出现死循环。④这种循环可以一次也不执行循环体。例打印1到20的整数。格式：DoWhile〈条件表达式〉〈循环体〉LoopPrivateSubForm_Click()DimiAsIntegeri=1DoWhilei<=20Printii=i+1LoopEndSubTF条件循环体图Do…LoopWhile语句流程图

5、格式：Do〈循环体〉LoopWhile〈条件表达式〉⑵.Do…LoopWhile语句说明：①至少要执行循环体一次。②与DoWhile循环的区别：DoWhile循环先测试条件是否成立，只有成立才执行循环；而该循环先执行循环体，后测试条件是否成立。PrivateSubForm_Click()DimiAsIntegeri=1DoPrintii=i+1LoopWhilei<=20EndSub例打印1到20的整数。格式：Do〈循环体〉LoopWhile〈条件表达式〉格式：DoUntil〈条件表达式〉〈循环体〉Loop⑶.DoUntil…Loop语句图DoUntil…

6、Loop语句流程图FT条件循环体打印1到20的整数。PrivateSubForm_Click()DimiAsIntegeri=1DoUntili>20Printii=i+1LoopEndSubPrivateSubForm_Click()DimiAsIntegeri=1DoPrintii=i+1LoopUntili>20EndSub⑷.Do…LoopUntil语句格式：Do〈循环体〉LoopUntil〈条件表达式〉TF条件循环体图Do…LoopUntil语句流程图打印1到20的整数。例Do…Loop循环编程计算下式的值(两种方法当型和直到型)。方法一、用当型

7、循环实现，程序如下：PrivateSubForm_Click()s=0:i=1DoWhilei<=100'也可写为DoUntili>100s=s+1/ii=i+1LoopPrint"s=";sEndSub方法二、用直到型循环实现：PrivateSubForm_Click()s=0:i=1Dos=s+1/ii=i+1LoopUntili>100'也可写为LoopWhilei<=100Print"s=";sEndSub2.For…Next循环循环体ExitFor循环体循环变量增加步长循环变量获得初值FT循环变量在终值内图For循环的执行过程格式：For循环变量

8、=初值To终值[Step步长]<循环体>Next[循环变量]For