VB.net Problème avec Timer

Bonjour,

Ben voilà, je suis en train de créer un application Client/serveur. Tout allait bien ... mais là je bloque.

Tout d'abord, le client envoie un packet au serveur qui le capte très bien, puis l'analyse pour savoir quel commande lui a été demandé.

Voici un bout de code :

Private Sub handleClientIncomingData(ByRef Data As String)
        Dim Command As String = Gettok(Data, "|", 1)   'Juste utilisé pour découpé le packet

        Select Case Command

            Case "AT"

                Email = Gettok(Data, "|", 2)
                Password = Gettok(Data, "|", 3) ' Email est password ont été annoncé au début du code
                Sleep(3000)

                Timer1.Start()


            Case "ST"

                Timer1.Enabled = False
                

        End Select

    End Sub



    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

        Send(Email , Password)

    End Sub

Le problème : Le timer ne débute pas ... et je ne vois pas pourquoi ...

D'avance merci !