VBscript 取年月日323

简介

在 VBscript 中，可以通过使用 Date 对象来取得当前日期和时间，还可以通过各种属性和方法来提取日期和时间的各个组成部分，比如年月日。

获取年月日

可以使用以下代码来获取当前日期的年、月和日：```vbscript
Dim dt
Set dt = Date
Dim year, month, day
year = Year(dt)
month = Month(dt)
day = Day(dt)
MsgBox "年：" & year & vbCrLf & _
"月：" & month & vbCrLf & _
"日：" & day
```

格式化日期

获得年月日后，还可以使用 FormatFunction 函数来格式化日期字符串。比如，以下代码将日期格式化为 "yyyy-MM-dd" 的形式：```vbscript
Dim dt
Set dt = Date
Dim formattedDate
formattedDate = FormatFunction(dt, "yyyy-MM-dd")
MsgBox formattedDate
```

其他相关函数

除了上述函数外，VBscript 中还有其他一些与日期和时间相关的函数：* Now() 函数：返回当前日期和时间，与 Date 对象类似。
* Weekday() 函数：返回指定日期是星期几。
* DateDiff() 函数：计算两个日期之间的差值。
* DateAdd() 函数：向指定日期添加或减去指定的时间间隔。
* DatePart() 函数：提取日期的指定部分，比如年、月、日、时、分、秒等。

示例

以下是一个完整的示例，演示如何使用 VBscript 来获取年月日并将其格式化为 "yyyy-MM-dd" 的形式：```vbscript
' 获取当前日期
Dim dt
Set dt = Date
' 提取年、月、日
Dim year, month, day
year = Year(dt)
month = Month(dt)
day = Day(dt)
' 格式化日期
Dim formattedDate
formattedDate = FormatFunction(dt, "yyyy-MM-dd")
' 输出结果
"年：" & year
"月：" & month
"日：" & day
"格式化后的日期：" & formattedDate
```