Accueil(écran de démarrage)

Soyez le premier à donner votre avis sur cette source.

Snippet vu 1 587 fois - Téléchargée 1 fois

Contenu du snippet

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

A voir également

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.

Du même auteur (Pmbanze)