TimeValue( TimeString )
Returns a double precision serial number based of the supplied string parameter.
Midnight = TimeValue(“23:59:59”)
Example:
Sub Main
Dim MTime
MTime = TimeValue("12:25:27 PM")
Print MTime
End Sub
Related Topics:
DateSerial Function
DateValue Function
Hour Function
Minute Function
Second Function
Now Function
TimeSerial Function