Weekday 函数 (Visual Basic)
更新：2007 年 11 月
返回一个 Integer 值，该值包含表示周中某一天的数。
Public Function Weekday( _
ByVal DateValue As DateTime, _
Optional ByVal DayOfWeek As FirstDayOfWeek = FirstDayOfWeek.Sunday _
) As Integer
参数
DateValue
必选。要确定为一周的某一天的 Date 值。DayOfWeek
可选项。从 FirstDayOfWeek 枚举选择的值，用于指定一周的第一天。如果未指定，则使用 FirstDayOfWeek.Sunday。
设置
DayOfWeek 参数可以有以下设置之一。
枚举值 |
值 |
说明 |
|---|---|---|
FirstDayOfWeek.System |
0 |
系统设置中指定的周的第一天 |
FirstDayOfWeek.Sunday |
1 |
星期日（默认） |
FirstDayOfWeek.Monday |
2 |
星期一（依照 ISO 8601 标准第 3.17 节） |
FirstDayOfWeek.Tuesday |
3 |
星期二 |
FirstDayOfWeek.Wednesday |
4 |
星期三 |
FirstDayOfWeek.Thursday |
5 |
星期四 |
FirstDayOfWeek.Friday |
6 |
星期五 |
FirstDayOfWeek.Saturday |
7 |
星期六 |
异常
异常类型 |
错误号 |
条件 |
|---|---|---|
DayOfWeek 小于 0 或大于 7。 |
如果正在升级使用非结构化错误处理方式的 Visual Basic 6.0 应用程序，请参见“错误号”一列。（您可以根据 Number 属性（Err 对象） 比较错误号。） 然而，如果可能，应当考虑用 Visual Basic 的结构化异常处理概述 替换这种错误控制。
备注
Weekday 函数返回的值是 DateValue 所对应的周中的某一天，该天是相对于 DayOfWeek 值所定义的周中的第一天而言的。例如，如果该日期为星期三，而指定的周的第一天为星期一，则该函数返回 3。
.gif "说明") 说明： |
|---|
Weekday 使用 System.Globalization 命名空间中的 CultureInfo 类的 CurrentCulture 属性的当前日历设置。默认 CurrentCulture 值由“控制面板”设置决定。 |
示例
下面的示例使用 Weekday 函数从指定日期中获取一周的某一天。
Dim oldDate As Date
Dim oldWeekDay As Integer
oldDate = #2/12/1969#
oldWeekDay = Weekday(oldDate)
' oldWeekDay now contains 4 because thisDate represents a Wednesday.
要求
**模块：**DateAndTime
**程序集：**Visual Basic 运行库（在 Microsoft.VisualBasic.dll 中）