Date Functions VisualBasic Script

Sub TimeValueDemo()
    MsgBox TimeValue("00:00:02")
End Sub