Display in a message box the number of seconds passed since midnight. : Single « Data Type « VBA / Excel / Access / Word






Display in a message box the number of seconds passed since midnight.

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

 








Related examples in the same category

1.Do Until... Loop Loops with Single value
2.Save random value to Single data type variable