TimeSerial function

TimeSerial( hour, minute, second )

Returns the time serial for the supplied parameters hour, minute, and second.
Sub Main
   Dim MTime
   MTime = TimeSerial(12, 25, 27) 
   Print MTime
End Sub