TimeSerial 函数

返回包含特定的小时、分钟和秒所对应的时间的 Variant (Date)。

语法

TimeSerial (小时、分钟、秒)

TimeSerial 函数语法具有以下命名参数：

Part	说明
小时	必需；Variant (Integer)。介于 0 (12:00 A.M.) 和 23 (11:00 P.M.) 之间的数字（含这两个数字）或数值表达式。
分钟	必需；Variant (Integer)。任何数值表达式。
第二	必需；Variant (Integer)。任何数值表达式。

若要指定时间（例如 11:59:59），每个 TimeSerial 参数的数字的范围应在此单元的正常范围内；也就是说，0–23 适用于小时，0–59 适用于分钟和秒。但是，还可以通过使用表示特定时间之前或之后的小时数、分钟数或秒数的任何数值表达式来指定每个参数的相对时间。

下面的示例使用表达式而不是绝对时间数。 TimeSerial 函数在 () 中午 () -15 前 12 - 6 6 小时或凌晨 5：45：00 返回 15 分钟的时间。

TimeSerial(12 - 6, -15, 0)

当任何参数超过此参数的正常范围时，它会递增到下一个更大的单元（如果适当）。例如，如果您指定 75 分钟，则计算结果为 1 小时 15 分钟。如果任意单个参数超出 -32,768 到 32,767 的范围，则将发生错误。如果由这三个参数指定的时间导致日期位于可接受的数据范围之外，则将发生错误。

此示例使用 TimeSerial 函数返回指定的小时、分钟和秒所对应的时间。

Dim MyTime
MyTime = TimeSerial(16, 35, 17)    ' MyTime contains serial 
    ' representation of 4:35:17 PM.

有关于 Office VBA 或本文档的疑问或反馈？请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。