Purtroppo il timer è una cosa che io la strozzerei...

E così complicata...

Gia ho trovato delle difficolta quando lo usata.


Cerca di definire qualcosa che lo ferma subito

per esempio...

----------
Dim Intero as Integer

'Cerca di prevenire che non arrivano più di 1 lettera
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e as System.EventArgs) _ Handles Timer1.Tick
If (Intero = 1) Then
...
Intero = 2
End If
----------

prova così

Puoi anche definirlo in altro modo, invece di utilizzare un valore intero