返回一个 Variant (Date) 值,其中包含具体的时间(时、分、秒)。
语法
TimeSerial (小时、分钟、秒)
警告 确保参数位于正确的值范围内。 无效参数可能会导致不正确的结果。
TimeSerial 函数语法具有以下参数:
| 参数 | 说明 |
|---|---|
| 小时 | 必需。 整数) (变体。 凌晨 0 点 (12:00 ) 到 晚上 11:00 的 23 (点 ) (含)或数字表达式。 |
| minute | 必需。 整数) (变体。 任何数值表达式。 |
| 第二个 | 必需。 整数) (变体。 任何数值表达式。 |
备注
若要指定时间(如 11:59:59),每个 TimeSerial 参数的数字范围应位于单元的正常范围内;也就是说,0-23 表示小时,0–59 表示分钟和秒。 但是,您也可以使用表示特定时间之前或之后一定小时数、分钟数或秒数的任何数值表达式为每个参数指定相对时间。 下面的示例使用表达式而不是绝对时间数字。
TimeSerial 函数返回 (-15 前 15 分钟) 中午 (12 - 6) 前 6 小时,即早上 5:45:00 的时间。
TimeSerial(12 - 6, -15, 0)
当任意参数超出该参数的正常范围时,它将根据需要递增到下一个较大的单位。 例如,如果指定 75 分钟,则其计算值为 1 小时 15 分钟。 如果任一参数超出 -32,768 到 32,767 的范围,则会出现错误。 如果三个参数指定的时间导致日期超出可接受的日期范围,则会出现错误。
查询示例
| Expression | 结果 |
|---|---|
| SELECT TimeSerial (18,12,10) AS NewTime FROM ProductSales GROUP BY TimeSerial (18,12,10) ; | 返回在函数参数中输入的由指定的小时、分钟和秒组成的“时间”,显示在列 NewTime 中。 结果:“下午 6:12:10”。 |
VBA 示例
注意
下面的示例演示了在Visual Basic for Applications (VBA) 模块中使用此函数。 有关使用 VBA 的详细信息,请在“搜索”旁边的下拉列表中选择“开发人员参考”,然后在搜索框中输入一个或多个术语。
此示例使用 TimeSerial 函数返回指定小时、分钟和秒的时间。
Dim MyTime
MyTime = TimeSerial(16, 35, 17)
' MyTime contains serial representation of 4:35:17 PM.