VB.net timer pendant une fonction récurente

Fermé
Stickmann - 5 juil. 2011 à 00:30
Bonjour,
j'ai traduit en visual basic.net l'algorithme de la tour d'hanoi avec une fonction récurrente :

Private Sub Hanoi(ByRef n, ByRef depart, ByRef arrivé, ByRef intermédaire, ByRef occur)
        If n > 0 Then
            occur += 1
            
            Hanoi(n - 1, depart, intermédaire, arrivé, occur) 
            RichTextBox1.Text = RichTextBox1.Text & depart & " -> " & arrivé & vbCrLf
            Hanoi(n - 1, intermédaire, arrivé, depart, occur)
    End Sub


et j'aimerais que pendant le calcul des étapes (qui peut durer longtemps) un timer "tick" (afin de calculer la vitesse de calcul) :

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        vitesse = occur / 10
    End Sub


et donc, le probléme auquel je suis confronté et le fait que le timer attend que le fonction récurenta hanoi soit terminé pour oser "ticker".

Merci d'avance,
Cordialement johan.