[VB] Form de passage
Résolu
amineroni
Messages postés
18
Date d'inscription
Statut
Membre
Dernière intervention
-
NicoDisso Messages postés 230 Date d'inscription Statut Membre Dernière intervention -
NicoDisso Messages postés 230 Date d'inscription Statut Membre Dernière intervention -
A voir également:
- [VB] Form de passage
- Passage qwerty azerty - Guide
- Vb - Télécharger - Langages
- Vb cable - Télécharger - Audio & Musique
- Test passage windows 11 - Guide
- Passage à windows 11 gratuit - Guide
2 réponses
il te suffit de mettre un timer sur ta seconde feuille qui au bout de 5 secondes decharges cette feuille et charge la 3eme...
dans une feuille tu places un timer et tu colles ce code..
Dim Compteur As Integer
Private Sub Form_Load()
Timer1.Interval = 1000 '1000 ms => 1s
Compteur = 1 'initialise
End Sub
Private Sub Timer1_Timer()
Compteur = Compteur + 1
If Compteur = 5 Then
Unload Me
MsgBox "Et voila", vbInformation, "Timer"
End If
End Sub
dans une feuille tu places un timer et tu colles ce code..
Dim Compteur As Integer
Private Sub Form_Load()
Timer1.Interval = 1000 '1000 ms => 1s
Compteur = 1 'initialise
End Sub
Private Sub Timer1_Timer()
Compteur = Compteur + 1
If Compteur = 5 Then
Unload Me
MsgBox "Et voila", vbInformation, "Timer"
End If
End Sub