返回一个 Variant (Date) 值,其中包含具体的时间(时、分、秒)。
语法
TimeSerial ( 小时,分钟,秒 )
警告 请确保参数位于正确的值范围内。 无效参数可能会导致不正确的结果。
TimeSerial函数语法具有以下参数:
参数 | 说明 |
---|---|
七点 |
必需。 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分钟之前(-15)上午6小时(12 - 6)或上午5:45:00 的时间。
TimeSerial(12 - 6, -15, 0)
当任何参数超过该参数的正常值时,它会根据需要增加到下一个较大的单位。 例如,如果你指定75分钟,它将计算为1小时15分钟。 如果任何一个参数超出范围-32768 到32767,将发生错误。 如果由三个参数指定的时间导致日期超出了可接受的日期范围,则会发生错误。
查询示例
表达式 | 结果 |
---|---|
从 ProductSales GROUP BY TimeSerial (18,12,10)选择 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.
注意: 本页面是自动翻译的,可能包含语法错误或不准确之处。 我们的目的是使此内容能对你有所帮助。 能否告知我们此信息是否有所帮助? 下面是该参考内容的英文版。