Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Visual Basic barre d'avancement ...

barre d'avancement ...

9 réponses
Avatar
Hervé
Bonjour,
je ne cherche pas tout à fait une barre d'avancement mais ... j'ai un
programme qui exécute des requêtes parfois longues, je voudrais que
l'utilisateur visualise que le programme tourne et qu'il ne puisse pas
penser que sa machine est plantée ... je vous remercie pour vos suggestions.
Signaler un problème avec ce contenu

9 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
LE TROLL
Salut,

Ben le plus simple est peut être un label avec
l'affichage d'un indice dedans, qui s'incrémente tous les x
fois que tu remontes un enregistrement, avec un DoEvents
pour que l'affichage ne perde pas la tête :o)
L'idéal serait de savoir combien tu as d'enregistrement, et
de décompter, c'est encore mieux, l'utilisateur sait quand
ça va se terminer, soit sur le principe:

dim i as long
dim j as long
j=0
for i = 1 to x
remonte enregistrement
j=j+1
label1.caption = j
DoEvents
next i


--------------

"Hervé" a écrit dans le message de news:
42e0a2d5$0$922$
Bonjour,
je ne cherche pas tout à fait une barre d'avancement mais
... j'ai un programme qui exécute des requêtes parfois
longues, je voudrais que l'utilisateur visualise que le
programme tourne et qu'il ne puisse pas penser que sa
machine est plantée ... je vous remercie pour vos
suggestions.



Avatar
Hervé
le problème c'est que pdt que le requête s'execute, le code n'avance pas !


"LE TROLL" <le a écrit dans le message de news:
%23$
Salut,

Ben le plus simple est peut être un label avec l'affichage d'un indice
dedans, qui s'incrémente tous les x fois que tu remontes un
enregistrement, avec un DoEvents pour que l'affichage ne perde pas la tête
:o)
L'idéal serait de savoir combien tu as d'enregistrement, et de décompter,
c'est encore mieux, l'utilisateur sait quand ça va se terminer, soit sur
le principe:

dim i as long
dim j as long
j=0
for i = 1 to x
remonte enregistrement
j=j+1
label1.caption = j
DoEvents
next i


--------------

"Hervé" a écrit dans le message de news:
42e0a2d5$0$922$
Bonjour,
je ne cherche pas tout à fait une barre d'avancement mais ... j'ai un
programme qui exécute des requêtes parfois longues, je voudrais que
l'utilisateur visualise que le programme tourne et qu'il ne puisse pas
penser que sa machine est plantée ... je vous remercie pour vos
suggestions.







Avatar
LE TROLL
Ah, c'est la requête qui met 6 mois, ok, en fait je ne fais
pas de bdd alors...
Dans ce cas, et sauf meilleure proposition, tu peux afficher
un message préalable du type:
"veuillez patienter, suivant le type de requête la recherche
peut prendre x secondes"
---------

"Hervé" a écrit dans le message de news:
42e0bc36$0$25041$
le problème c'est que pdt que le requête s'execute, le
code n'avance pas !


"LE TROLL" <le a écrit dans le message de
news: %23$
Salut,

Ben le plus simple est peut être un label avec
l'affichage d'un indice dedans, qui s'incrémente tous les
x fois que tu remontes un enregistrement, avec un
DoEvents pour que l'affichage ne perde pas la tête :o)
L'idéal serait de savoir combien tu as d'enregistrement,
et de décompter, c'est encore mieux, l'utilisateur sait
quand ça va se terminer, soit sur le principe:

dim i as long
dim j as long
j=0
for i = 1 to x
remonte enregistrement
j=j+1
label1.caption = j
DoEvents
next i


--------------

"Hervé" a écrit dans le message de news:
42e0a2d5$0$922$
Bonjour,
je ne cherche pas tout à fait une barre d'avancement
mais ... j'ai un programme qui exécute des requêtes
parfois longues, je voudrais que l'utilisateur visualise
que le programme tourne et qu'il ne puisse pas penser
que sa machine est plantée ... je vous remercie pour vos
suggestions.











Avatar
Aski
Hi,

En folâtrant sur son clavier, Hervé s'est exprimé ainsi :

"Hervé" a écrit dans le message de news:
42e0a2d5$0$922$
Bonjour,
je ne cherche pas tout à fait une barre d'avancement mais ... j'ai
un programme qui exécute des requêtes parfois longues, je voudrais
que l'utilisateur visualise que le programme tourne et qu'il ne
puisse pas penser que sa machine est plantée ... je vous remercie
pour vos suggestions.







le problème c'est que pdt que le requête s'execute, le code n'avance
pas !



Tu charges le contrôle animation, tu le lances et l'arrêtes lorsque tu le
désires.

--
Cordialement,

Aski

AntiSpamEdit, aide de K9 en français
http://h.dechily.free.fr/
http://h.charlier.de.chily.perso.cegetel.net/index.htm
Avatar
scraper
Bonjour Hervé, dans le message
news:42e0a2d5$0$922$
tu disais :


Bonjour,
je ne cherche pas tout à fait une barre d'avancement mais ... j'ai un
programme qui exécute des requêtes parfois longues, je voudrais que
l'utilisateur visualise que le programme tourne et qu'il ne puisse pas
penser que sa machine est plantée ... je vous remercie pour vos
suggestions.



comme te le suggère Aski, tu peux utiliser une animation

dans ta vorm, ajoute le composant Microsoft Common Controls 2.6.2

insère une animation

ensuite, dans ton code, au moment opportun, ajoute ceci :

'-----

With Animation1
.AutoPlay = True
.Open monfichier.avi
End With

'-------

si Animation1 est le nom de ton contrôle, et monfichier.avi le nom de
fichier que tu as choisis (tu peux en trouver dans des dll de ressources ...



--

Adresse invalide
Merci de répondre sur le forum ...
http://scraper.chez.tiscali.fr

scraper
Avatar
Driss HANIB
autre façon

tu transforme la souris en petit sablier tourant..

me.mousepointer=vbhourglass
doevents

à la fin de ton travail
tu remets normal
me.mousepointer=vbdefault

si le programme plante, le sablier arrête de tourner..

Driss
"Hervé" a écrit dans le message de
news:42e0a2d5$0$922$
Bonjour,
je ne cherche pas tout à fait une barre d'avancement mais ... j'ai un
programme qui exécute des requêtes parfois longues, je voudrais que
l'utilisateur visualise que le programme tourne et qu'il ne puisse pas
penser que sa machine est plantée ... je vous remercie pour vos


suggestions.




Avatar
Hervé
merci je vais essayer ça

"Aski" a écrit dans le message de news:
%2396B%
Hi,

En folâtrant sur son clavier, Hervé s'est exprimé ainsi :

"Hervé" a écrit dans le message de news:
42e0a2d5$0$922$
Bonjour,
je ne cherche pas tout à fait une barre d'avancement mais ... j'ai
un programme qui exécute des requêtes parfois longues, je voudrais
que l'utilisateur visualise que le programme tourne et qu'il ne
puisse pas penser que sa machine est plantée ... je vous remercie
pour vos suggestions.







le problème c'est que pdt que le requête s'execute, le code n'avance
pas !



Tu charges le contrôle animation, tu le lances et l'arrêtes lorsque tu le
désires.

--
Cordialement,

Aski

AntiSpamEdit, aide de K9 en français
http://h.dechily.free.fr/
http://h.charlier.de.chily.perso.cegetel.net/index.htm



Avatar
Aski
Hi,

En folâtrant sur son clavier, scraper s'est exprimé ainsi :

Bonjour Hervé, dans le message
news:42e0a2d5$0$922$
tu disais :


Bonjour,
je ne cherche pas tout à fait une barre d'avancement mais ... j'ai un
programme qui exécute des requêtes parfois longues, je voudrais que
l'utilisateur visualise que le programme tourne et qu'il ne puisse
pas penser que sa machine est plantée ... je vous remercie pour vos
suggestions.



comme te le suggère Aski, tu peux utiliser une animation

dans ta vorm, ajoute le composant Microsoft Common Controls 2.6.2

insère une animation

ensuite, dans ton code, au moment opportun, ajoute ceci :

'-----

With Animation1
.AutoPlay = True
.Open monfichier.avi
End With

'-------

si Animation1 est le nom de ton contrôle, et monfichier.avi le nom de
fichier que tu as choisis (tu peux en trouver dans des dll de
ressources ...



Et, si tu hésites pour le fichier d'animation, les plus courants sont
filemove.avi, search.avi, findcomp.avi et finffile.avi.

Avec ce qu'ont écrit nos amis scraper et Driss, tu es servi. :-)

Aski
Avatar
LE TROLL
Le problème de l'animation, est que si tu déclares des
objets complémentaires, la distribution va s'accroître en
taille, ocx, dll qui correspondent...
-----------

"Hervé" a écrit dans le message de news:
42e0e2d6$0$1214$
merci je vais essayer ça

"Aski" a écrit dans le message de news:
%2396B%
Hi,

En folâtrant sur son clavier, Hervé s'est exprimé ainsi :

"Hervé" a écrit dans le message de news:
42e0a2d5$0$922$
Bonjour,
je ne cherche pas tout à fait une barre d'avancement
mais ... j'ai
un programme qui exécute des requêtes parfois longues,
je voudrais
que l'utilisateur visualise que le programme tourne et
qu'il ne
puisse pas penser que sa machine est plantée ... je
vous remercie
pour vos suggestions.







le problème c'est que pdt que le requête s'execute, le
code n'avance
pas !



Tu charges le contrôle animation, tu le lances et
l'arrêtes lorsque tu le désires.

--
Cordialement,

Aski

AntiSpamEdit, aide de K9 en français
http://h.dechily.free.fr/
http://h.charlier.de.chily.perso.cegetel.net/index.htm