Voila j'ai une fenetre qui souvre par un clique et que je souhaite quelle se ferme toutes seul au bout de 5 secondes, j'ai donc tapé ce code que vous voyez ci dessous mais ca ne marche pas, pourquoi donc ?

Merci d'avance pour votre aide.


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Public Class Form2
 
    Private Sub ProgressBar1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProgressBar1.Click
 
    End Sub
 
    Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        TimerFormAffiche.Interval = 5000
        TimerFormAffiche.Enabled = True
    End Sub
 
    Private Sub TimerFormAffiche_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TimerFormAffiche.Tick
        ' Fermeture de cette fenêtre.
        Me.Close()
    End Sub
End Class