Non è proprio il massimo contare il tempo hh:mm.ss con dei Timer usando delle variabili, usa le funzioni appropriate.

Poi scusa ma questo:

codice:
ts = ts + 1
If ts = 59 Then
tm = tm + 1
ts = 0
End If
If tm = 59 Then
th = th + 1
tm = 0
End If
Sarà semmai:

codice:
ts = ts + 1
If ts > 59 Then
tm = tm + 1
ts = 0
End If
If tm > 59 Then
th = th + 1
tm = 0
End If