Ok ci sono


l'ho ragionata al contrario....sbagliavo l'approccio...

Private TempoRimasto As Integer = 180

Private Sub CountDown2()
Dim ts As TimeSpan = New TimeSpan(0, 0, TempoRimasto)
If TempoRimasto> 0 Then
TempoRimasto= TempoRimasto- 1
Else
Timer1.Stop()
End If
Me.txtTempo.Text = ts.Minutes.ToString("00") & ":" & ts.Seconds.ToString("00")
end sub

Cosi mi funziona!!!!!!!!!!!!!