第3章VisualBasic语言进阶.pptVIP

第3章VisualBasic语言进阶3.1基本控制结构3.2数组3.3用户定义类型3.4算法及举例1

3.1基本控制结构3.1.1顺序结构3.1.2分支结构3.1.3循环结构2

3.1.1顺序结构顺序结构就是整个程序按书写顺序依次自上而下执行。前面两章设计和编写的程序都是顺序结构的。顺序结构如图所示，先执行A，再执行B，即自上而下依次运行。图(左)图为框式流程图，图(右)为N-S流程图，又称为盒图。3

3.1.2分支结构分支结构用于判断并分支，又称为选择结构。如图所示，E代表条件，当E条件成立（True）时执行A，否则（False）执行B，两条分支汇合在一起为一个出口。分支结构有几种形式：If...Then...Else结构、SelectCase结构和IIf函数。4

3.1.2分支结构1．If...Then...Else结构If...Then...Else结构表示“如果...就...否则”。语法： If条件Then语句或者： If条件1Then 语句块1 [ElseIf条件2Then 语句块2]... ... [Else 语句块n] EndIf条件可以为各种表达式，都要转换为Boolean型，即所有非零的数值、字符等都转换为True，而0、0值则转换为False。当If...Then...Else结构只有单独的If语句时，可以没有EndIf语句。首先测试条件1，如果为False，就测试条件2，依此类推，直到找到一个为True的条件就执行Then后面的语句块。当只有一个条件而且执行的是单个语句时，If...Then...Else结构可以简化成If...Then语句。5

3.1.2分支结构【例3-2】使用If...Then...Else结构查询学生的成绩，大于等于60分的为及格，其余为不及格。界面设计和功能要求与【例3-1】相同，程序流程图如图所示。程序代码如下：PrivateSubCommand1_Click()单击按钮显示成绩DimxAsSingleDimyAsStringx=Val(Text1.Text)Ifx=60Theny=及格Elsey=不及格EndIfText2.Text=yEndSub8

3.1.2分支结构【例3-3】使用多个条件的If...Then...Else结构查询学生的成绩，将成绩分成优、良、中、及格和不及格，90～100为优，80～90为良，70～80为中，60～70为及格，60以下为不及格。9

3.1.2分支结构程序代码如下：PrivateSubCommand1_Click()单击按钮显示成绩DimxAsSingleDimyAsStringx=Val(Text1.Text)Ifx=90Theny=优ElseIfx=80Theny=良ElseIfx=70Theny=中ElseIfx=60Theny=及格Elsey=不及格EndIfText2.Text=yEndSub程序分析：使用有多个条件的If...Then...Else结构，判断的顺序是“x=90”?“x=80”?“x=70”?“x=60”?剩下的就是“x60”。10

3.1.2分支结构2．SelectCase结构SelectCase结构与If...Then...Else结构类似，但对多条件选择时，有时用SelectCase语句代码效率更高，更易读。语法：SelectCase变量|表达式Case值1 语句块1[Case值2 语句块2]...[CaseElse 语句块n]EndSelect11

3.1.2分支结构说明：（1）SelectCase只计算一次变量或表达式的值，然后与每个Case的值1、值2等进行比较，如果相等，就执行该case后对应的语句块；如果没有相匹配的，则执行CaseElse中的语句块。（2）值1、值2等可以取以下几种形式：具体常数。例如，1、2、“a”等。连续的数据范围。例如，1to100、atoz等。满足某个条件的表达式。例如，I0等。也可以