TimeSerial 函数
应用对象
Microsoft 365 专属 Access Access 2024 Access 2021 Access 2019 Access 2016
返回一个 Variant (Date) 值，其中包含具体的时间（时、分、秒）。
语法
TimeSerial (小时、分钟、秒)
警告 确保参数在正确的值范围内。 无效的参数可能会导致不正确的结果。
TimeSerial 函数语法具有以下参数：
| 参数 | 说明 |
|---|---|
| 小时 | 必需。 Variant (Integer) 。 介于 0 (12：00 ) 到 23 (晚上 11：00 之间的数字 ) （含）或数值表达式。 |
| 分钟 | 必需。 Variant (Integer) 。 任何数值表达式。 |
| 第二 | 必需。 Variant (Integer) 。 任何数值表达式。 |
备注
若要指定时间（如 11：59：59），每个 TimeSerial 参数的数字范围应位于单位的正常范围内;即，0-23 表示小时，0-59 表示分钟和秒。 但是，还可以使用表示特定时间之前或之后的小时数、分钟数或秒数的任何数值表达式指定每个参数的相对时间。 以下示例使用表达式而不是绝对时间数字。
TimeSerial 函数在 () 中午 () -15 前 12 - 6 6 小时返回 15 分钟的时间，即上午 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 PM”。 |
VBA 示例
注意
下面的示例演示了如何在 Visual Basic for Applications (VBA) 模块中使用此函数。 有关使用 VBA 的详细信息，请在搜索旁边的下拉列表中选择“开发人员参考”，并在搜索框中输入一个或多个术语。
此示例使用 TimeSerial 函数返回指定小时、分钟和秒的时间。
Dim MyTime
MyTime = TimeSerial(16, 35, 17)
' MyTime contains serial representation of 4:35:17 PM.