Tous pour le PC
 
AccueilCalendrierFAQRechercherMembresGroupesS'enregistrerConnexion

Partagez | 
 

 [TUTO] Contoler une progressbar avec un Timer

Voir le sujet précédent Voir le sujet suivant Aller en bas 
AuteurMessage
mad
Admin
Admin
avatar

Messages : 37
Date d'inscription : 29/05/2011
Age : 27

MessageSujet: [TUTO] Contoler une progressbar avec un Timer   Mar 5 Juil - 18:43

Contoler une progressbar avec un Timer


Bonjour à toute et à tousse,
Aujourd'hui je vais vous apprendre à controler une progressbar avec un Timer.

Je vous explique : vous voulez faire un petit logiciel dans lequel quand vous cliquez sur un bouton le logiciel exécute une action m'est en même tant déclenché la progressbar.

Vous aurez besoins de :

- 1 Bouton (le déclencheur)
- 1 Progressebar
-1 Timer

L'Application


On double clique sur le bouton qui va déclenché la progressBar :

Code:
Timer1.Start()


On double clique sur le Timer :

Code:
ProgressBar1.Increment(1)
        If ProgressBar1.Value = ProgressBar1.Maximum Then
            Timer1.Stop()
        End If

Le Code entier donne :

Code:
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Timer1.Start()
    End Sub

    Private Sub ProgressBar1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProgressBar1.Click

    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        ProgressBar1.Increment(1)
        If ProgressBar1.Value = ProgressBar1.Maximum Then
            Timer1.Stop()
        End If
    End Sub
End Class

Nous pouvons aussi rajouté un message (Exemple : Terminé) Pour cela rajouté :

Code:
MsgBox("Votre message")

Le code entier donne :

Code:
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Timer1.Start()
    End Sub

    Private Sub ProgressBar1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProgressBar1.Click

    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        ProgressBar1.Increment(1)
        If ProgressBar1.Value = ProgressBar1.Maximum Then
            Timer1.Stop()
            MsgBox("Terminé")
        End If
    End Sub
End Class

Voila vous venez d'apprendre comment contrôlé facilement une ProgressBar.

Merci de ne pas recopier ce tuto sans mon autorisation


Cordialement,
Mad
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://pcstuce.jeunforum.com
 
[TUTO] Contoler une progressbar avec un Timer
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» [Pixinsight] nouveau tuto prétraitement CCD avec carte d'étoiles synthétiques et correction de la distorsion / process icons 3.50
» Musique Reiki (1h 12.29) (Reiki Timer - Musique Reiki avec cloche toutes les 3 mn)
» Guérir avec l'aide des anges
» probleme avec EOS MOVREC
» [Tuto] Faire des petits nœuds

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
PCstuce :: Programmation :: Visual Basic et .NET Framework-
Sauter vers: