VBA程序流程控制语句

《VBA程序流程控制语句》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、本节内容及要求：1.熟练掌握行if语句、块if结构、SelectCase情况选择结构有使用，掌握选择的嵌套结构；2.熟练掌握实现循环结构的For/Next循环结构及ExitFor语句、Do/Loop循环结构的使用，掌握多重循环。本章重点：选择结构及循环结构的实现及其应用本章难点：选择的嵌套及多重循环结构VBA程序流程控制语句1执行语句分为3种结构：顺序结构：顺序结构是最基本的程序结构，按程序中语句编写的先后顺序逐条执行。条件结构：根据条件选择运行的结果。循环结构：对程序中的某段代码重复执行时，可以使用循环结构。2分支语句Goto语句形式:GoTo{标号

2、行号}作用是无条件地转

3、移到标号或行号指定的那行语句.标号是一个字符序列,行号是一个数字序列。例如：Lp:………………gotolp3条件测试语句If…Then语句(单分支结构)If<表达式>Then语句块EndIf或If<表达式>Then<语句>例:已知两个数x和y，比较它们的大小，使得x大于y.IfxThen<语句块1>Else<语句块2>EndIfIf<表达式>Then<语句1>Else<语句2>双分支选择结构执

4、行过程条件N语句序列1EndIf后面的语句Y语句序列25条件测试语句例如：输出x,y两个中值较大的一个值。IFX>YThenPrintXElsePrintYEndIf也可以写成如下的单行形式：IIF(X>Y,PrintX,PrintY)6条件测试语句If…Then…ElseIf语句(多分支结构)形式:If<表达式1>Then<语句块1>ElseIf<表达式2>Then<语句块2>…[Else语句块n+1]EndIf7条件测试语句例：输入一学生成绩，评定其等级。方法是：90~100分为“优秀”，80~89分为“良好”，70~79分为“中等”，60~69分为“及格”，60分以为“

5、不合格”使用IF语句实现的程序段如下：Ifx>=90thenPrint"优秀"ElseIfx>=80ThenPrint"良好"ElseIfx>=70ThenPrint"中等"ElseIfx>=60ThenPrint"及格"ElsePrint"不及格"EndIf8条件测试语句4.SelectCase语句（情况语句）形式：SelectCase变量或表达式Case表达式列表1语句块1Case表达式列表2语句块2…[CaseElse语句块n+1]EndSelect数值型或字符串表达式9条件测试语句例如：将例使用selectcase…..语句来实现的程序段如下：SelectCasexC

6、ase90to100Print"优秀"Case80to89Print"良好"Case70to79Print"中等"Case60to69Print"及格"CaseElsePrint"不及格"EndSelect10条件测试语句5.选择结构的嵌套下面是两种正确的嵌套形式：（1）IF<条件1>Then…..IF<条件2>Then……Else…..EndIf….Else….IF<条件3>Then…..Else…..EndIf…..EndIF（2）IF<条件1>Then…..SelectCase…Case……IF<条件2>Then……Else…..EndIf……Case….…..EndS

7、elect….EndIF11（1）IIf函数函数形式：Iif（表达式，当条件为True时的值，当条件为False时的值例：求X、Y中大的数，并放入变量Tmax中：Tmax=Iif（X>Y,X,Y）（2）Choose函数函数形式：Choose（整数表达式，选项列表）如果整数表达式的值是1，则选择列表中的第1项，依次类推；如果小于1或大于列表项数时，则返回NULL。例：根据nub为1-4的值，换算成不同的运算符：OP=Choose（nub,“＋”，“－”，“×”，“÷”）12条件测试语句注意：只要在一个分支内嵌套，不出现交叉，满足结构规则，其嵌套的形式将有很多种，嵌套层次也可以任

8、意多。对于多层IF嵌套结构中，要特别注意IF与Else的配对关系，一个Else必须与IF配结，配对的原则是：在写含有多层嵌套的程序时，建议使用缩进对齐方式，这样容易阅读和维护。13循环语句循环结构1.For循环语句(一般用于循环次数已知)形式：For循环变量＝初值to终值[Step步长]语句块[ExitFor]语句块Next循环变量>0初值<终值=1时,可省略<0初值>终值=0死循环步长14循环语句循环次数例:ForI=2To13Step3PrintI,NextIPrint“I=“,I循环执行次数：4输