TimeValue

返回包含时间的 Date 子类型的 Variant。

TimeValue(time)

time 参数通常是代表从 0:00:00 (12:00:00 A.M.) 到 23:59:59 (11:59:59 P.M.) 的字符串表达式（包括 0:00:00 和 23:59:59）。不过，time 也可以是代表该范围内任何时间的表达式。如果 time 参数包含 Null，则返回 Null。

说明

可以采用 12 或 24 小时时钟格式输入时间。例如 "2:24PM" 和 "14:24" 都是有效的 time 参数。如果 time 参数包含日期信息， TimeValue 函数并不返回日期信息。然而，如果 time 参数包含无效的日期信息，则会出现错误。

下面的示例利用 TimeValue 函数将字符串转化为时间。也可以用 日期文字 直接赋时间给 Variant 类型的变量(例如， MyTime = #4:35:17 PM#).

Dim MyTimeMyTime = TimeValue("4:35:17 PM")    ‘ MyTime 包含 "4:35:17 PM"。

VBS教程：函数-TimeValue

原文：http://www.jb51.net/article/4577.htm