VBA - 星期名称

WeekDayName 函数返回指定日期的星期名称。

句法

WeekdayName(weekday[,abbreviate[,firstdayofweek]]) 

参数说明

• 星期 - 必需参数。星期的编号。

• 缩写 - 可选参数。一个布尔值，指示是否缩写月份名称。如果留空，将采用 False 作为默认值。

• 星期起始 - 可选参数。指定一周的第一天。

  • 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 : " &WeekdayName(3))
   msgbox("Line 2 : " &WeekdayName(2,True))
   msgbox("Line 3 : " &WeekdayName(1,False))
   msgbox("Line 4 : " &WeekdayName(2,True,0))
   msgbox("Line 5 : " &WeekdayName(1,False,1))
End Sub

执行上述函数时，将生成以下输出。

Line 1 : Tuesday
Line 2 : Mon
Line 3 : Sunday
Line 4 : Tue
Line 5 : Sunday