problema timer

[mike11]

problema timer

Salve a tutti avrei un problema da sottoporvi con un codice di access di cui ho scarse conoscenze.
Ho questo codice per la partenza di un timer attraverso un pulsante di run :

Private Sub Form_Timer()

If Left(Me.Crono, 2) = "59" And Mid(Me.Crono, 4, 2) = "59" And Right(Me.Crono, 2) = "59" Then
Me.Crono = "00:00:00"
Else
If Right(Me.Crono, 2) = "59" And Mid(Me.Crono, 4, 2) = "59" And Mid(Crono, 2, 1) < 9 Then
Me.Crono = Left(Me.Crono, 1) & Mid(Me.Crono, 2, 1) + 1 & ":00:00"
Else
If Mid(Me.Crono, 4, 2) = "59" And Right(Me.Crono, 2) = "59" Then
Me.Crono = Left(Me.Crono, 1) + 1 & "0:00:00"
Else
If Right(Me.Crono, 2) = "59" And Mid(Me.Crono, 5, 1) = "9" Then
Me.Crono = Left(Me.Crono, 3) & Mid(Me.Crono, 4, 1) + 1 & "0:00"
Else
If Right(Me.Crono, 2) = "59" And Mid(Me.Crono, 5, 1) < "9" Then
Me.Crono = Left(Me.Crono, 4) & Mid(Crono, 5, 1) + 1 & ":00"
Else
If Right(Me.Crono, 1) = "9" Then
Me.Crono = Left(Me.Crono, 6) & Mid(Me.Crono, 7, 1) + 1 & 0
Else
Me.Crono = Left(Me.Crono, 7) & Right(Me.Crono, 1) + 1
End If
End If
End If
End If
End If
End If
End Sub

con un campo in questo formato ?00:00:00? situato nella stessa maschera dovrei dare un?impostazione in secondi, minuti o ore per fermare il timer . Purtroppo non riesco a farlo c?è qualcuno che può darmi una mano. Grazie

[claudioweb]

Ciao

Sposto la discussione in una sezione più idonea, così magari otterrai risposte.

Purtroppo non so aiutarti con Access.