有大佬帮忙解释下CASE语句吗？谢谢！

Question

不知道CASE这个语句和IF有什么不同 现在我只会IF 请教大家关于CASE语句的问题 例如以下的这个代码中星期的体现是什么原理?
Private Sub Timer1_Timer()
Dim xq As String
Select Case Weekday(Date$) - 1
Case 0
xq = "日"
Case 1
xq = "一"
Case 2
xq = "二"
Case 3
xq = "三"
Case 4
xq = "四"
Case 5
xq = "五"
Case 6
xq = "六"
End Select
Label1.Caption = Date$ & Chr$(10) & Time$ & Chr$(13) & "星期" & xq
End Sub

Answer 1

简单说来作用就是由Weekday(Date$) - 1值的不同情况来执行语句Case 0 'Weekday(Date$) - 1值为0时，只执行xq="日"，然后执行End Select 后面的语句xq = "日"Case 1xq = "一" 'Weekday(Date$) - 1值为1时，只执行xq="一",然后执行End Select 后面的语句Case 2xq = "二" 'Weekday(Date$) - 1值为2时，只执xq="二"，然后执行End Select 后面的语句Weekday(Date$)返回一个数值 即一星期的第几天(默认星期日为一星期的第一天，星期一为一星期的第二天。。。)因此 ，当Date所表示的日期 是星期日 时返回1；是星期一 时返回2 。。。。由此Weekday(Date$) - 1表示的就是 星期几（值为1时表示星期1 值为2时表示星期2 。。。 特殊的是值为0时表示星期日）

Answer 2

case 判断的是值