Bonjour,

Toujours dans le cadre de mon application de gestions de mimes et quizz, je souhaiterais pouvoir choisir un quizz au hasard.

Je suis parti sur un timer qui me ferait défiler rapidement dans un "label" les noms des Quizs qui se trouvent dans la "combobox"

J'ai un bouton départ qui lance le timer et l'arrête au top du candidat et un label dans lequel je voudrais faire afficher les uns après les autres, les quizz se trouvant la combobox

Pour linstant je ne vois pas comment faire pour que cela fonctionne.


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub Btn_QuizzDepartQuizzAuHasard_Click(sender As Object, e As EventArgs) Handles Btn_QuizzDepartQuizzAuHasard.Click
        If Btn_QuizzDepartQuizzAuHasard.Text = "Départ" Then
            Tim_QuizAuHasard.Enabled = True
            Btn_QuizzDepartQuizzAuHasard.Text = "Stop"
        Else
            Tim_QuizAuHasard.Enabled = False
            Btn_QuizzDepartQuizzAuHasard.Text = "Départ"
        End If
    End Sub
 
    Private Sub Tim_QuizAuHasard_Tick(sender As Object, e As EventArgs) Handles Tim_QuizAuHasard.Tick
        Lab_QuizzNomDuQuizz.Text = Cb_QuizzChoix.SelectedIndex + 1
    End Sub
Merci par avance à celui ou celle qui pourra m'aider.

@+ Martipit