A voir également:
- Progress bar vb6
- Vb6 - Télécharger - Divers Utilitaires
- Battery bar - Télécharger - Informations & Diagnostic
- True launch bar - Télécharger - Divers Utilitaires
- Bar vertical clavier - Forum Windows
- Jbl bar 5.1 hdmi arc problem ✓ - Forum Enceintes / HiFi
8 réponses
Salut,
Supposons que ta progress barr s'appel 'Prog'.
Son attribut "Value" (donc, Prog.Value) prend des valeurs entre 0 et 100. Pour faire progresser la barre, tu dois incrémenter cette valeur en fonction de la progression de ton programme.
Le mieux est de commencer par initialiser cette valeur:
Prog.Value = 0
En suite du rend ta progress barr visible
Prog.Visible = True
Puis tu incrémente la valeur:
Prog.Value = Prog.Value + x
où x est la progression souhaitée. Attention de ne pas dépasser 100.
Exemple:
Prog.Value = 0
Prog.Visible = True
For j = 1 To 8
For i = 1 To 14
Code........
Prog.Value = Prog.Value + 100 / 112.1
Next i
intX = AddAppProperty("AppTitle", RclExec(j), RCLTitle(j))
intX = AddAppProperty("AppIcon", RclExec(j), RCLIc(j))
Next j
Prog.Visible = False
*******************
Pq 112.1 ? Parceque 8*14 = 112. Et comme 100/112 *8*14 > 100 (à cause des arrondi), j'utilise 112.1 pour rester < 100
J'espère que ça suffira
Rien n'est plus dangereux qu'une idée quand on a qu'une i
:-)
Supposons que ta progress barr s'appel 'Prog'.
Son attribut "Value" (donc, Prog.Value) prend des valeurs entre 0 et 100. Pour faire progresser la barre, tu dois incrémenter cette valeur en fonction de la progression de ton programme.
Le mieux est de commencer par initialiser cette valeur:
Prog.Value = 0
En suite du rend ta progress barr visible
Prog.Visible = True
Puis tu incrémente la valeur:
Prog.Value = Prog.Value + x
où x est la progression souhaitée. Attention de ne pas dépasser 100.
Exemple:
Prog.Value = 0
Prog.Visible = True
For j = 1 To 8
For i = 1 To 14
Code........
Prog.Value = Prog.Value + 100 / 112.1
Next i
intX = AddAppProperty("AppTitle", RclExec(j), RCLTitle(j))
intX = AddAppProperty("AppIcon", RclExec(j), RCLIc(j))
Next j
Prog.Visible = False
*******************
Pq 112.1 ? Parceque 8*14 = 112. Et comme 100/112 *8*14 > 100 (à cause des arrondi), j'utilise 112.1 pour rester < 100
J'espère que ça suffira
Rien n'est plus dangereux qu'une idée quand on a qu'une i
:-)
jbenerro >> C'est important pour répondre à la question ?
LeLaid >> A quoi servent les AddAppProperty ? Merci ! :)
Kalamit,
o(^_^)o
LeLaid >> A quoi servent les AddAppProperty ? Merci ! :)
Kalamit,
o(^_^)o
A rien,... c'est un extrait de code d'un de mes pgms. J'ai oublié de les enlever.
Salutations et bonne prog
Rien n'est plus dangereux qu'une idée quand on a qu'une i
:-)
Salutations et bonne prog
Rien n'est plus dangereux qu'une idée quand on a qu'une i
:-)
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
bonjour cher internaute . votre sujet bm a vraiment i,teresse j 'espere que vous le detaille plus . je demande a ceux qui ont une application de vb contenant "progress bar" de l 'envoyer via le msn " tikouk.88@hotmail.fr"
Bonjour,
Je voudrais enchainer des ProgressBar c'est a dire :
Il se trouve que j'ai trois ProgressBar donc mes codes dans les timers se sont ceux là :
ProgressBar2.Increment(1)
If ProgressBar2.Value = ProgressBar2.Maximum Then
End If
Donc mon but serais que la deuxième bar commencent juste après que la première c'est finis et la troisième commence juste après que la deuxième serait finis également.
Merci, de m'aidez sil vous plait.
Excusez moi pour les faute d'orthographe.
Je voudrais enchainer des ProgressBar c'est a dire :
Il se trouve que j'ai trois ProgressBar donc mes codes dans les timers se sont ceux là :
ProgressBar2.Increment(1)
If ProgressBar2.Value = ProgressBar2.Maximum Then
End If
Donc mon but serais que la deuxième bar commencent juste après que la première c'est finis et la troisième commence juste après que la deuxième serait finis également.
Merci, de m'aidez sil vous plait.
Excusez moi pour les faute d'orthographe.
J'ai lu ton mail sur la barre de progression.
En fait j'ai un pb. Mon programme insere un fichier excel qui contient 2228 lignes de calculs.
Donc quand je clique sur valider dans mon prog les calculs commencent et c'est hyper long.
Je veux donc inserer une barre de progression : 2228 represente 100% et donc quand je calcule 1 ligne ma barre evolu de 100/2228;
je ne sais vraiment pas comment faire etant nul en Vb.
Est ce que tu peux simuler mon prog c'est a dire creer un fichier excel avec moins de ligne biensur et m'envoyer le code de cette barre de progression qui evolue en meme temps que les lignes de la feuille excel
Merci d'avance
dilhan
RECTIFICATION: vient de trouver, fo ajouter component windows 6.0 dans le menu projet, component