VBscript 中获取星期信息81

在 VBscript 中，可以通过使用 Weekday 函数来获取指定日期对应的星期信息。Weekday 函数的语法如下：```vbscript
Weekday(date, firstDayOfWeek)
```

其中：* `date` 为要获取星期信息的日期，可以是日期常量、日期变量或日期表达式。
* `firstDayOfWeek`（可选）指定一周的第一天。默认值为 1，表示星期日。如果省略此参数，则使用系统默认的星期一开始。

Weekday 函数返回一个介于 1 到 7 之间的整数，表示指定日期对应的星期：* 1：星期日
* 2：星期一
* 3：星期二
* 4：星期三
* 5：星期四
* 6：星期五
* 7：星期六

例如，要获取 2023 年 3 月 8 日的星期信息，可以这样写：```vbscript
Dim weekday
weekday = Weekday("3/8/2023")
```

此时，`weekday` 变量的值为 3，表示 2023 年 3 月 8 日是星期三。

此外，还可以使用以下代码获取指定日期的星期名称：```vbscript
Dim weekname
weekname = FormatWeekday(Weekday("3/8/2023"))
```

其中，`FormatWeekday` 函数可以将星期数字转换为星期名称。此时，`weekname` 变量的值为 "星期三"。

使用 Weekday 函数的示例

下面是一些使用 Weekday 函数的示例：```vbscript
' 获取当前日期的星期
Dim weekday
weekday = Weekday()
' 获取指定日期的星期
Dim date = "3/8/2023"
Dim weekday
weekday = Weekday(date)
' 获取指定日期的星期名称
Dim date = "3/8/2023"
Dim weekname
weekname = FormatWeekday(Weekday(date))
' 根据星期设置变量
Dim weekday
weekday = Weekday()
If weekday = 1 Then
' 星期日
End If
If weekday = 2 Then
' 星期一
End If
```

请注意，Weekday 函数返回的星期数字与一些国家或地区使用的习惯可能不同。例如，在一些国家，星期一开始是 1，而星期天是 7。在使用 Weekday 函数时，需要根据实际情况调整代码。

此外，还可以使用 DatePart 函数来获取指定日期的星期部分。DatePart 函数的语法如下：```vbscript
DatePart(interval, date)
```

其中：* `interval` 指定要获取的日期部分，可以是 "w"（星期）或其他日期部分（如 "y" 年、"m" 月、"d" 日）。
* `date` 为要获取日期部分的日期，可以是日期常量、日期变量或日期表达式。

要获取指定日期的星期，可以使用以下代码：```vbscript
Dim weekday
weekday = DatePart("w", "3/8/2023")
```

此时，`weekday` 变量的值仍然为 3，表示 2023 年 3 月 8 日是星期三。

2024-12-08

上一篇：如何使用 VBScript 创建数组

下一篇：VBScript Array 数组赋值