Soyez le premier à donner votre avis sur cette source.
Snippet vu 5 441 fois - Téléchargée 3 fois
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.