Progress bar vb6
bonjour
est ce que je peux avoir une idée sur la programmation du control progress bar sous vb6 , au demarrage de mon application ?
merci
est ce que je peux avoir une idée sur la programmation du control progress bar sous vb6 , au demarrage de mon application ?
merci
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
:-)-
Salut,
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 -
-
-
Salut maha
t'es de kel origine? -
jbenerro >> C'est important pour répondre à la question ?
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
:-) -
salut ,
je peux avoir une petite application sur le controle progressbar -
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"
-
essaye sa :
Try
ProgressBar1.Value += 5
Catch
ProgressBar1.Value = 100
End Try -
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.
