Private myStopwatch As New Stopwatch
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Dim elapsed As TimeSpan = Me.myStopwatch.Elapsed
Me.Label1.Text = String.Format("{0:00}:{1:00}:{2:00}.{3:000}", _
Math.Floor(elapsed.TotalHours), _
elapsed.Minutes, _
elapsed.Seconds, _
elapsed.Milliseconds)
End Sub
Dim ts As TimeSpan = swTimer.Elapsed
Dim strResult As String = ""
strResult = String.Format("{0:#0}:{01:00}:{02:00} ", ts.Hours, ts.Minutes, ts.Seconds)