更新: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 中)