VBscript 日期字符串：格式化、解析和转换126

格式化 VBscript 日期

在 VBscript 中，可以使用 FormatDateTime() 函数格式化日期对象。该函数采用两个参数：一个日期对象和一个格式字符串。

以下是一些常用的格式字符串示例：
"dd/mm/yyyy" - 将日期格式化为 "dd/mm/yyyy"，例如 "25/12/2023"
"yyyy-mm-dd" - 将日期格式化为 "yyyy-mm-dd"，例如 "2023-12-25"
"dd mmm yyyy" - 将日期格式化为 "dd mmm yyyy"，例如 "25 Dec 2023"
"hh:mm:ss tt" - 将时间格式化为 "hh:mm:ss tt"，其中 "tt" 表示 AM 或 PM，例如 "09:30:00 AM"
"yyyy-mm-dd hh:mm:ss" - 将日期和时间格式化为 "yyyy-mm-dd hh:mm:ss"，例如 "2023-12-25 09:30:00"

例如，以下代码将当前日期格式化为 "dd/mm/yyyy"：```vbscript
Dim dtNow, strFormattedDate
dtNow = Date()
strFormattedDate = FormatDateTime(dtNow, "dd/mm/yyyy")
```

解析 VBscript 日期

可以使用 CDate() 函数将字符串解析为日期对象。

例如，以下代码将 "25/12/2023" 字符串解析为日期对象：```vbscript
Dim dtDate
dtDate = CDate("25/12/2023")
```

转换 VBscript 日期

可以使用 DateAdd()、DateDiff() 和 DateSerial() 函数转换日期。

DateAdd() 函数将指定的时间间隔添加到日期对象。

例如，以下代码将 10 天添加到当前日期：```vbscript
Dim dtNewDate
dtNewDate = DateAdd("d", 10, Date())
```

DateDiff() 函数返回两个日期之间的差异，以指定的时间间隔为单位。

例如，以下代码返回当前日期与给定日期之间的相差天数：```vbscript
Dim dtGivenDate, nDaysDiff
dtGivenDate = CDate("2023-12-25")
nDaysDiff = DateDiff("d", dtGivenDate, Date())
```

DateSerial() 函数创建一个日期对象，该对象表示指定年份、月份和日期。

例如，以下代码创建一个表示 2023 年 12 月 25 日的日期对象：```vbscript
Dim dtDate
dtDate = DateSerial(2023, 12, 25)
```

其他 VBscript 日期操作
DatePart() 函数返回日期对象的指定部分，例如年、月或日。
Weekday() 函数返回日期对象的星期几，其中 1 表示星期日，7 表示星期六。
Now() 函数返回当前日期和时间。

了解 VBscript 中的日期字符串至关重要，它使您可以执行各种常见的日期操作，例如格式化、解析和转换。通过使用本文提供的函数和示例，您可以有效地处理日期字符串并执行所需的日期计算。

2025-01-09

上一篇：VBScript 脚本中的 Crt 对象详解

下一篇：VBScript如何调用Excel函数