[VB6] Comment faire patienter l'utilisateur ?

Comment faire patienter l'utilisateur ? [VB6] - VB/VBA/VBS - Programmation

Marsh Posté le 23-06-2002 à 15:11:40    

Voilà, je voudrais faire patienter l'utilisateur n secondes sans utiliser de timer (ni aucun contrôle) et en évitant de préférence la boucle for ... next vide ... Comment je pourrais faire ?


---------------
www.novemberguitars.com
Reply

Marsh Posté le 23-06-2002 à 15:11:40   

Reply

Marsh Posté le 23-06-2002 à 16:19:30    

si pouvais préciser la raison de l'attente, sa serait mieux, cra il y a plein de moyen, et de facon de patienter, ouverture programme, copie de fichier, enregistrement fichier, ect...


---------------
;) Bienvenue sur le site...:)             http://perso.wanadoo.fr/rapport
Reply

Marsh Posté le 23-06-2002 à 18:23:25    

ouverture d'un autre programme, mais une recherche sur www.vbsource.com m'a permis de trouver mon bonheur.


---------------
www.novemberguitars.com
Reply

Marsh Posté le 25-06-2002 à 14:53:32    

MossieurPropre a écrit a écrit :

Voilà, je voudrais faire patienter l'utilisateur n secondes sans utiliser de timer (ni aucun contrôle) et en évitant de préférence la boucle for ... next vide ... Comment je pourrais faire ?  




 
 
Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
 :jap:


---------------
Si j'etais Dieu, et ben j'croirai pas en moi..Et si j'etais moi, et ben j'me mefierai
Reply

Marsh Posté le 25-06-2002 à 17:15:48    

mandrin0 a écrit a écrit :

 
 
 
Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
 :jap:  




 
 :non: ca ne marchera pas ! l'API slepp bloque l'application pendant un certains temps. Lui il veut quelques chose, pour faire patienter l'utilisateur, pendant par exemple, l'enregistrement de fichier, ouverture, ect...


---------------
;) Bienvenue sur le site...:)             http://perso.wanadoo.fr/rapport
Reply

Marsh Posté le 25-06-2002 à 21:01:01    

while patienter
  DoEvent
  patienter=patienterencore(param1)
wend


---------------
"I wonder if the internal negative pressure in self pumping toothpaste tubes is adjusted for different market altitudes." John Carmack
Reply

Marsh Posté le 25-06-2002 à 21:18:41    

trop tard ...
 
j'ai fait ça avec du QBasic [:ddr555]
 
c pour mon programme dans lequel je voulais faire apparaitre le liste des PCs sur le réseau local, en même temps dans le prog VB je lance Net View
 
c pê pas très élégant mais ça fonctionne au poil :)


---------------
www.novemberguitars.com
Reply

Marsh Posté le 25-06-2002 à 21:20:38    

MossieurPropre a écrit a écrit :

trop tard ...
 
j'ai fait ça avec du QBasic [:ddr555]
 
c pour mon programme dans lequel je voulais faire apparaitre le liste des PCs sur le réseau local, en même temps dans le prog VB je lance Net View
 
c pê pas très élégant mais ça fonctionne au poil :)




 :pt1cable:  
 
cf ma siganture  [:darkmavis]


---------------
"I wonder if the internal negative pressure in self pumping toothpaste tubes is adjusted for different market altitudes." John Carmack
Reply

Marsh Posté le 25-06-2002 à 21:26:08    

mareek a écrit a écrit :

 
 :pt1cable:  
 
cf ma siganture  [:darkmavis]  




 
[:ddr555]


Message édité par MossieurPropre le 25-06-2002 à 21:26:32

---------------
www.novemberguitars.com
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed