vb循环结构程序设计实例课件.pptxVIP

Step 步长For 循环变量=初值 To 终值循环体语句Next [循环变量]For—Next循环的一般语法格式步长为1时可省略步长可取正或负数；步长为负时终值应小于初值成对出现第四章1第一章 第二章 第三章第四章第五章 第六章 第七章 第八章 第九章 第十章第十一章VB程序设计循环变量值介于初值和终值之间时反复执行

For-Next常用于循环次数已知的循环中循环体语句可以是一条或多条语句可以使用ExitFor语句提前结束循环For i=1 To 10x=x+Int(Rnd*100)sum=sum+xIfsum300ThenExitForEndIfNext iPrint sum程序说明第四章2第一章 第二章 第三章第四章第五章 第六章 第七章 第八章 第九章 第十章第十一章VB程序设计

【例】找最大值。单击最大值按钮时产生10个1～100之间的随机整数显示在框架内的标签中，同时将最大值显示在下方的标签内。lbldata第四章3第一章 第二章 第三章第四章第五章 第六章 第七章 第八章 第九章 第十章第十一章VB程序设计lblmax

产生一个随机数，存放在变量产生一个随机数，存放在变量aa中中将将aa显示在标签（显示在标签（lblDalblDattaa）中）中将将aa作作为当前最大值放在变量为当前最大值放在变量maxmax中中产生新的随机数，存放在变量产生新的随机数，存放在变量aa中中将将aa连接显示在标签（连接显示在标签（lblDalblDattaa）原有内容之后）原有内容之后如果如果aa大于大于maxmax，，则将则将aa作作为最大值放在为最大值放在maxmax中中编程分析处理第1个数据a=Int(Rnd*100)+1lblData.Caption=amax=a处理第2个数据a=Int(Rnd*100)+1lblData.Caption=lblData.Caption,aIfamaxThenmax=aEndIf9第四章4第一章 第二章 第三章第四章第五章 第六章 第七章 第八章 第九章 第十章第十一章VB程序设计次

PrivateSubcmdMax_Click()DimaAsInteger, iAsInteger,maxAsIntegerRandomizea=Int(Rnd*100)+1lblData.Caption=amax=aFori=1To9重复执行9次a=Int(Rnd*100)+1lblData.Caption=lblData.Caption,aIfamaxThenmax=aEndIfNext ilblMax.Caption=maxEndSub求1000个数中的最大?程序代码第四章5第一章 第二章 第三章第四章第五章 第六章 第七章 第八章 第九章 第十章第十一章VB程序设计

常用于执行条件明确，但事前不知道循环次数的循环语法格式DoWhile循环条件循环体语句Loop执行流程Do While - Loop语句条件判断Yes循环体语句No第四章6第一章 第二章 第三章第四章第五章 第六章 第七章 第八章 第九章 第十章第十一章VB程序设计

通常情况下，在进入DoWhile-Loop语句前应给循环变量设置初值循环体中必须包含使循环趋于结束的语句可以使用Exit Do语句随时跳出当前所在的循环，提前结束循环语句Exit Do可出现在循环体语句中的任意位置，通常与If语句联合使用Do While - Loop语句第四章7第一章 第二章 第三章第四章第五章 第六章 第七章 第八章 第九章 第十章第十一章VB程序设计

语法格式Do循环体语句LoopWhile循环条件执行流程Do - Loop While语句条件判断循环体语句YesNo第四章8第一章 第二章 第三章第四章第五章 第六章 第七章 第八章 第九章 第十章第十一章VB程序设计

【实例】输入若干成绩（输入-1时结束）计算总成绩和平均成绩。连续弹绩出输入框接收成，直至-1-1时结束时结束计算总成绩和平均成绩多行文本框LblaverageLblsumtxtscore第四章9第一章 第二章 第三章第四章第五章 第六章 第七章 第八章 第九章 第十章第十一章VB程序设计

输入第一个数据，存放在变量输入第一个数据，存放在变量scorescore中中记录已经输入的学生人数记录已经输