WeekDay()
函数返回一个从1
到7
的整数,表示指定日期的星期几。
语法
Weekday(date[,firstdayofweek])
参数
- date - 必需的参数。星期几将返回指定的日期。
- Firstdayofweek - 一个可选参数。指定一周中的第一天。它可以采取以下值。
- 0 = vbUseSystemDayOfWeek - 使用国家语言支持(NLS)API设置.
- 1 = vbSunday - 星期日
- 2 = vbMonday - 星期一
- 3 = vbTuesday - 星期二
- 4 = vbWednesday - 星期三
- 5 = vbThursday - 星期四
- 6 = vbFriday - 星期五
- 7 = vbSaturday - 星期六
示例
添加一个模块,并添加以下示例代码 -
Private Sub Constant_demo_Click()
msgbox("Line 1: " & Weekday("2013-05-16",1))
msgbox("Line 2: " & Weekday("2013-05-16",2))
msgbox("Line 3: " & Weekday("2013-05-16",2))
msgbox("Line 4: " & Weekday("2010-02-16"))
msgbox("Line 5: " & Weekday("2010-02-17"))
msgbox("Line 6: " & Weekday("2010-02-18"))
End Sub
执行上面示例代码,得到以下结果 -
Line 1: 5
Line 2: 4
Line 3: 4
Line 4: 3
Line 5: 4
Line 6: 5