返回包含具有具体时.docxVIP

返回包含具有具体时、分、秒的时间 VBA 函数 返回一个 Variant (Date) ，包含具有具体时、分、秒的时间。 语法 TimeSerial(hour, minute, second) TimeSerial 函数语法有下列的命名参数： 部分 描述 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 函数返回中午之前六小时 (12 - 6) 又十五分钟 (-15) 的时间，即 5:45:00 A.M. TimeSerial(12 - 6, -15, 0) 当任何一个参数的取值超出正常范围时，它会适时进位到下一个较大的时间单位。例如，如果指定了 75 （75 分钟），则这个时间被解释成一小时又十五分。 如果一个参数值超出 -32 ，768 到 32 ，767 的范围， 就会导致错误发生。如果三个参数指定的时间会使日期超出可接受的日期范围，则亦会导致错误发生。 TimeSerial 函数示例 本示例使用 TimeSerial 函数来将已知的时分秒转换为时间。 Dim MyTime MyTime = TimeSerial(16, 35, 17) MyTime 的值为 4:35:17 PM 之时间表达式。