Salut tout le monde !
Dans cette forme (Accueil), vous servira de passer de form 1 à form 2
avec les codes sources ci-dessous !
Public Class Accueil
Private Sub Acueil_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Timer1.Enabled = True
End Sub
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
If ProgressBar1.Value = 100 Then
Me.Hide()
Connexion.Show()
Timer1.Enabled = False
Else
ProgressBar1.Value = ProgressBar1.Value + 1
End If
If ProgressBar2.Value = 100 Then
Me.Hide()
Connexion.Show()
Timer1.Enabled = False
Else
ProgressBar2.Value = ProgressBar1.Value + 1
End If
End Sub
End Class
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.