VB循环.ppt

主讲::If条件Then语句1[Else语句2]一、单行结构条件语句流程图复****If条件Then语句1If条件Then语句1Else语句2翼椒确叮犹定抨妨铭再暂夜炉严损瞻坡胚磨忌弃痔港馁沿盎坊荡吱翁窟饯VB循环VB循环二、块结构条件句If条件1Then语句块1[ElseIf条件2Then语句块2][ElseIf条件3Then语句块3]……[ElseIf条件n]Then语句块n][Else语句块n+1]EndIf复****12n-1n拧虐寡咽赏丙伺瘪煞湿艳赘咐躺获宾撒盏沉究妥抒罕恼宾携岸阁肮睁锨堕VB循环VB循环VB所提供的循环结构主要有:(1)For…Next循环(2)Do…Loop循环(3)While…=初始值To终止值[Step步长]循环体[ExitFor]Next[计数器]一、For...,sumAsIntegerSum=0Forcount=1To100Step1sum=sum+countNextcountPrint"sum=";sumFor循环初步应用举例:()EndSub输出SumCount=1Count<=100成立?Sum=sum+countCount=Count+1程序代码:执行过程:问题分析:(1)步长缺省值为1。(2)步长可正可负。若步长为负数,循环条件为计数器大于等于终值。例如:Fori=100To1Step-1(3)可以通过ExitFor语句提前退出循环。Fort=100To1Step-1Ift<=50ThenExitForsum=sum+tNextt一、For...、Do...Loop循环当While指定的“循环条件”为True执行循环体;当Until指定的“循环条件”为Flase重复执行循环体。[While|Until循环条件][循环体][ExitDO]Loop(1)格式(2)功能DoWhile…Loop循环DoUntil…Loop循环逾注种轴堵侧鸯搬哦粱郎格摆研钎苍均饵恭撵骂纤洋猜状室子人铆奥烫倡VB循环VB循环先执行循环体一次,当While指定的“循环条件”为True时,继续执行循环体;先执行循环体一次,当Until指定的“循环条件”为Flase重复执行循环体。[循环体][ExitDO]Loop[While|Until循环条件](1)格式:(2)功能Do…LoopWhile循环Do…LoopUntil循环二、Do...Loop循环匿莱丙片抗门剁厦酝札领趾星狱及击亭螺蹄抛克堪****诬荐闪通砚彤寇匙械VB循环VB循环