共用方式為


TimeValue Function 

Returns a Variant of subtype Date containing the time.


TimeValue(time)

Remarks

The time argument is usually a string expression representing a time from 0:00:00 (12:00:00 A.M.) to 23:59:59 (11:59:59 P.M.), inclusive. However, time can also be any expression that represents a time in that range. If time contains Null, Null is returned.

You can enter valid times using a 12-hour or 24-hour clock. For example, "2:24PM" and "14:24" are both valid time arguments. If the time argument contains date information, TimeValue doesn't return the date information. However, if time includes invalid date information, an error occurs.

The following example uses the TimeValue function to convert a string to a time. You can also use date literals to directly assign a time to a Variant (for example, MyTime = #4:35:17 PM#).

Dim MyTime

MyTime = TimeValue("4:35:17 PM")   ' MyTime contains 4:35:17 PM.

Requirements

Version 1

See Also

Reference

DateSerial Function
DateValue Function
Hour Function
Minute Function (VBScript)
Now Function
Second Function
TimeSerial Function