Exemple de progressbar

Soyez le premier à donner votre avis sur cette source.

Vue 19 052 fois - Téléchargée 4 448 fois

Description

Ce code donne un exemple de progressbar

Conclusion :


Exemple de progressbar

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Messages postés
8
Date d'inscription
mercredi 31 mai 2006
Statut
Membre
Dernière intervention
22 juin 2006

bon au lieu de vous charier trouverz de bon arguments pour critiquer méme moi qui est hyper débutnat j'ai vu de grosses fautes .

1) méme si cette source à vocation d'aprendre elle ne sert juste qu'a faire conaitre la propriété value de la progress bar. ( sé se que je cherché mé jorais pu lavoir nimporte ou ailleur )

2) la contruction du code est vraiment trés mauvaise et méme si au niveux des perf c'est insignifiant il faut quand méme faire gaffe sa peut induire en erreur les grand débutants.



Private Sub Timer1_Timer()
ProgressBar1.Value = ProgressBar1.Value + 10
If ProgressBar1.Value = 30 Then
ProgressBar1.Value = ProgressBar1 + 50
If ProgressBar1.Value = 80 Then
ProgressBar1.Value = ProgressBar1.Value + 20
If ProgressBar1.Value = ProgressBar1.Max Then
Timer1.Enabled = False
End If
End If
End If
End Sub
regarder les 2 dernier if sont en trop puisque que vu la contruction du code equation sera toujours bonne
30 + 50 =80
80+20 =10

Private Sub Timer2_Timer()
If ProgressBar1.Value = ProgressBar1.Max Then
SECONDS_TO_WAIT = "5"
ORIGINAL_TIME = DateTime.Time
End
End If
End Sub

le mieus sé de suprimer le timer 2 é de faire ainsi


Private Sub Timer1_Timer()
ProgressBar1.Value = ProgressBar1.Value + 10
If ProgressBar1.Value = 30 Then
ProgressBar1.Value = 100
Timer1.Enabled = False
SECONDS_TO_WAIT = "5"
ORIGINAL_TIME = DateTime.Time
end if
End
end sub
Messages postés
2
Date d'inscription
mardi 11 juillet 2006
Statut
Membre
Dernière intervention
20 juillet 2006

Bon Ok. Mais si on fouille un temps soit peu dans l'aide, on a la même info succinte.
Messages postés
2
Date d'inscription
mardi 18 juillet 2006
Statut
Membre
Dernière intervention
20 juillet 2006

ce code ma aidez beaucoup malgré c'est débutant
Messages postés
2
Date d'inscription
mardi 11 juillet 2006
Statut
Membre
Dernière intervention
20 juillet 2006

Aucun intéret !!!
Messages postés
56
Date d'inscription
samedi 4 février 2006
Statut
Membre
Dernière intervention
12 janvier 2008

Ca ma beaucoup aidé merci. pourais tu me donner le code pour faire bouger la progress bar avecun slide. Merci

Je travaille avec un controleur de lumiere avec pc. je foire un peu
Afficher les 9 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.

Du même auteur (Ositiris)