1、判断结构本讲内容If 语句Select Case 语句程序控制结构程序一般是按照书写的顺序执行的，但有时候需要按照不同的条件执行不同的操作，这就是流程控制VBA中程序的控制结构分为：顺序结构选择结构循环结构顺序结构AB选择结构PAB循环结构PA判断语句判断语句用来根据条件表达式的结果控制程序的流程If 语句Select Case 语句If 语句行结构If Then Else 块结构If Then Else End IfIf 语句流程图：语句1语句2表达式TrueFalseIf 语句实例：设计一个找出两个数中更大数的程序，界面设计如下图所示。在 B1 和 B2 单元格分别输入任意一个数，单击“更
2、大数”圆角矩形时，在 B3 单元格输出两数中更大的数If 语句实践1：设计一个找出三个数中最大数的程序，界面设计如下图所示。在 B1、B2 和 B3 单元格分别输入任意一个数，单击“最大数”圆角矩形时，在 B4 单元格输出三个数中更大的数If 语句实践2：编写一个过程，用输入框 InputBox 函数输一个学生的成绩，然后判断此学生的成绩是否合格，并将评判结果以“成绩合格”或“成绩不合格”用消息框显示If 语句实例：设计一个“健康秤”程序，界面设计如下图所示。单击“健康状况”按钮，根据公式：标准体重=身高-105 判断某人的健康状况。体重高于标准体重*1.1为偏胖，在 B3 单元格输出“偏胖，
3、注意节食”；体重低于标准体重*0.9为偏瘦，在 B3 单元格输出“偏瘦，增加营养”；其它则在 B3 单元格输出“正常，继续保持”If ThenElseIf ThenElseEnd IfEnd If嵌套的If语句If 语句实践3：编写一个过程，用InputBox函数输入某门课程的百分制成绩x，然后将其按下表的评定条件转换成等级制成绩y，并将等级制成绩用MsgBox函数输出优良中及格不及格90 x10080 x9070 x8060 x70 x60If 语句If ThenElseIf Then ElseIf Then Else End IfIf 语句ElseIf 语句的流程图：语句2 假 真语句1表
4、达式2表达式3语句3语句4 真假 假 真表达式1If 语句If 语句实践4：根据杭州的气候特点，通常认定3月5月为春季，6月8月为夏季，9月11月为秋季，12月次年2月为冬季。编写一个程序，在B1单元格输入当前的月份，单击“判定”按钮时，在B2单元格以“*月是*季”的形式输出结果Select Case语句Select Case Case Case Case ElseEnd Select:算术表达式或字符表达式，测试对象:下列格式中的一个或多个(,)精确表示：,，如：1,3,5,7,9范围表示：To，如：A To Z关系表示：Is ，如：Is =60功能：根据测试表达式的值，从多个语句块中选择符合条件的一个语句块执行！Select Case 语句Select Case 语句实践：使用 Select Case 语句重新实现“实践3”程序？Select Case 语句实践：某商场举行周年庆购物促销活动，活动规则如下：金额500元以下不享受优惠 金额500元及以上且小于2000元优惠10%金额2000元及以上且小于4000元优惠12%金额4000元及以上且小于6000元优惠14%金额6000元及以上优惠15%编写一个过程，输入购物总价，计算应付款和优惠款额
