Progress bar

Soyez le premier à donner votre avis sur cette source.

Vue 12 999 fois - Téléchargée 1 707 fois

Description

C'est juste une progress bar toute simple, il y a quelque truc sympa mais simple comme changer le pointeur de la souris ou la couleur d'un label mais ceci reste assez basique mais c toujours bien pour apprendre .
Merci c'est mon premier prog soyez indulgeant

Source / Exemple :


'Ici déclaration d'un variable
Dim a

Private Sub Command1_Click()
'Ici on dit que la variable a est égal a 0
a = 0
'Ici on dit que la progress bar peut être utiliser
If a = 0 Then
Timer1.Enabled = True
End If
End Sub

Private Sub Timer1_Timer()
' Ici on incrémente une variable
a = a + 10
'Ici On dit que quand la progress bar est a 100 % qu'il arrête de compter
If a = 100 Then
Timer1.Enabled = False
End If
ProgressBar1 = a
'Ici on dit que quand la progress bar est a moins de 50 % la couleur de l'affichage de la progression sur le label et en rouge
If a < 50 Then
Label1.ForeColor = &HFF
End If
'Ici on dit que quand la progress bar est a plus de 50 % la couleur de l'affichage de la progression sur le label et en jaune
If a > 50 Then
Label1.ForeColor = &H80FFFF
End If
'Ici on dit simplement au label1 qu'il est égal a la progression
Label1 = a & "%"
'Ici on fait en sorte que le pointeur de la souris mette un sablier pendant qu'il travail
If a < 100 Then
MousePointer = 11
End If
'Ici on dit que quand la progression est finit que le pointeur redeviens une flèche
If a = 100 Then
MousePointer = 0
End If
End Sub

Codes Sources

A voir également

Ajouter un commentaire Commentaires
dread2010
Messages postés
5
Date d'inscription
mercredi 16 mai 2007
Statut
Membre
Dernière intervention
19 mai 2007

17 mai 2007 à 13:46
merci c'est simple et efficace.....cool
jrbleboss
Messages postés
480
Date d'inscription
jeudi 6 mai 2004
Statut
Membre
Dernière intervention
3 septembre 2007
1
28 mars 2005 à 17:36
le mieux c'est de se faire sa progress bar perso qui change de couleur et tout mais bon ...........

C'est pas trop mal 8/10

JRB
fazep
Messages postés
1
Date d'inscription
dimanche 16 janvier 2005
Statut
Membre
Dernière intervention
24 janvier 2005

24 janv. 2005 à 08:51
... si quelqu'un a sait comment changer la couleur de la barre de progression je suis preneur...
sebmafate
Messages postés
4936
Date d'inscription
lundi 17 février 2003
Statut
Membre
Dernière intervention
14 février 2014
38
8 oct. 2003 à 19:59
tu connais le nombre de requêtes ?

si oui tu bornes ton progressbar avec ce nombre et tu incrémentes ton compteur a chaque requête terminée.

Séb
kiminox
Messages postés
33
Date d'inscription
jeudi 27 septembre 2001
Statut
Membre
Dernière intervention
4 octobre 2003

8 oct. 2003 à 19:49
et pour faire un progress bar quand on ne connait pas le temps total?
ex : j'ai une requete de milliers d'insertion
je mets donc un progress bar pour faire patienter mais le pb c'est que je connais pas le temps total...
comment faire?
z'avez une idée?

Merci
Afficher les 10 commentaires

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.