语   法:
TimeSerial (小时、_分钟、_秒)

TimeSerial 函数语法具有以下 命名参数：
Part 说明
hour 必需；Variant (Integer)。 介于 0 (12:00 A.M.) 和 23 (11:00 P.M.) 之间的数字（含这两个数字）或数值表达式。
minute 必需；Variant (Integer)。 任何数值表达式。
second 必需；Variant (Integer)。 任何数值表达式。

备   注:
若要指定时间（如 11：59：59），则 每个 TimeSerial 参数的数字范围都应在单位的正常范围内;即，0 – 23 表示小时 – ，0 59 表示分钟和秒。 但是，您也可以使用表示特定时间之前或之后的某些小时数、分钟数或秒数的任何数值表达式来指定每个参数的相对时间。

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

TimeSerial(12 - 6, -15, 0)

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

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