今日学习目标

  • 掌握If...Then...Else语句
  • 掌握Select Case语句
  • 学会使用嵌套条件

知识点

1. If...Then...Else

vba
If 条件 Then
' 条件成立时执行
Else
' 条件不成立时执行
End If

2. Select Case

vba
Select Case 变量
Case 值1
' 处理值1
Case 值2
' 处理值2
Case Else
' 其他情况
End Select

今日代码

vba
If 条件 Then
    ' 条件成立时执行
Else
    ' 条件不成立时执行
End If

练习题

  1. 根据分数判断等级
  2. 判断一个年份是否为闰年
  3. 根据成绩给出奖惩建议

参考解答

1. 使用If...ElseIf或Select Case判断分数区间（90以上优秀，80-89良好等）。 2. 闰年判断：(Year Mod 4 = 0 And Year Mod 100 <> 0) Or (Year Mod 400 = 0)。 3. 根据分数给出奖励（如请客）或惩罚（如加班复习）的建议。

由在线工具箱(www.vba.net)整理制作