Data Type VisualBasic Script

Sub timerDemo()
    Dim seconds As Single
    seconds = timer
    MsgBox (seconds)
End Sub