零点起皮飞学visualbasic之灵活的程序流程.pptxVIP

第4章 灵活的程序——流程控制;4.1 根据条件执行——判断语句;4.1.1 如果..就...——If语句;;;图4.1 流程示意图;【示例4-1】;【示例4-2】;【示例4-3】;【示例4-4】;4.1.2 如果...如果...就...——多重If语句;图4.2 流程示意图;【示例4-5】;该If语句判断工资cSalary是否大于1000元。如果条件为真，则税款cTax为10元。判断工资cSalary是否大于500元。如果条件为真，则税款cTax为5元。如果工资cSalary大于500元条件不为真，则税款cTax为0。该语句还可以更复杂一些。 01 cSalary = InputBox(输入工资) InputBox函数接受输入信息 02 If cSalary1000 then 如果工资大于1000 03 cTax=10 税款为10元 04 ElseIf cSalary500 then 如果工资为500～1000 05 cTax=5 税款为5元 06 ElseIf cSalary250 then 如果工资为250～500 07 cTax=2.5 税款为2.5 08 Else 如果工资为0～250 09 cTax=0 税款为0 10 End If 11 Print 工资 csalary 元，需缴税： ctax 显示信息;;【示例4-6】;4.1.3 Select Case语句;;图4.3 流程示意图;【示例4-7】;改写后的代码如下： 01 Select Case cSalary select语句 02 Case is1000 工资大于1000元 03 cTax=10 税款为10元 04 Case is500 工资为500～1000 05 cTax=5 税款为5元 06 Case is250 工资为250～500 07 cTax=2.5 税款为2.5元 08 Case is0 工资0～250元 09 cTax=0 税款为0 10 Case Else 无此工资 11 Print 对不起，没有工资 12 End Select 13 Print 工资 csalary 元，需缴税： ctax;【示例4-8】;;【示例4-9】;;4.2 重复执行——循环语句;4.2.1 For循环;;;图4.4 流程示意图;【示例4-10】;;;4.2.2 Do循环;;【示例4-11】;;;;图4.5 流程示意图;【示例4-12】;【示例4-13】;4.2.3 While循环;【示例4-14】;4.2.4 枚举循环;;【示例4-15】;【示例4-16】;4.3 小 结