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

Question

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

Answer 1

简单说来

作用就是由Weekday(Date$) - 1值的不同情况来执行语句

Case 0 'Weekday(Date$) - 1值为0时，只执行xq="日"，然后执行End Select 后面的语句
xq = "日"
Case 1
xq = "一" 'Weekday(Date$) - 1值为1时，只执行xq="一",然后执行End Select 后面的语句
Case 2
xq = "二" 'Weekday(Date$) - 1值为2时，只执xq="二"，然后执行End Select 后面的语句

Weekday(Date$)返回一个数值 即一星期的第几天(默认星期日为一星期的第一天，星期一为一星期的第二天。。。)
因此 ，当Date所表示的日期 是星期日 时返回1；是星期一 时返回2 。。。。

由此Weekday(Date$) - 1表示的就是 星期几（
值为1时表示星期1 值为2时表示星期2 。。。 特殊的是值为0时表示星期日）

Answer 2

case 判断的是值