Accueil > > > ATTENDRE UN CERTAINS TEMPS (PAUSE) SANS "PERDRE LA MAIN" EN VB .NET
 ATTENDRE UN CERTAINS TEMPS (PAUSE) SANS "PERDRE LA MAIN" EN VB .NET
 Information sur la source
 Description
Bon j'ai deja mis ce petit code ici en vb6 mais j'ai preferer ajouter une source differente plutot que de modifier l'ancienne et y ajouter la fonction en .net . Ceci peut vous servir pour vos applis utilisants des sockets ou pour certains effet visuel par exemple... Enfin bref, c'est assez explicite pour que vous sachiez quand est ce que cela peut vous servir.
 Source
- 'à mettre dans un module ou qq part dans votre form
-
- Friend Sub hbwait(ByVal ms_to_wait As Long)
- Dim endwait As Double
- endwait = Environment.TickCount + ms_to_wait
- While Environment.TickCount < endwait
- System.Threading.Thread.Sleep(1)
- Application.DoEvents()
- End While
- End Sub
-
-
- 'puis vous n'avez qu'a appeler la fonction comme tel :
-
- hbwait(500) 'attends 500 millisecondes
-
-
- 'ce petit exemple affiche la date et l'heure dans le label1, puis rafraichit cette valeur 5 secondes/5000 millisecondes apres pendant lesquels vous pouvez positionner,fermer votre form, etc...
- Label1.Text = Now
- hbwait(5000)
- Label1.Text = Now
'à mettre dans un module ou qq part dans votre form
Friend Sub hbwait(ByVal ms_to_wait As Long)
Dim endwait As Double
endwait = Environment.TickCount + ms_to_wait
While Environment.TickCount < endwait
System.Threading.Thread.Sleep(1)
Application.DoEvents()
End While
End Sub
'puis vous n'avez qu'a appeler la fonction comme tel :
hbwait(500) 'attends 500 millisecondes
'ce petit exemple affiche la date et l'heure dans le label1, puis rafraichit cette valeur 5 secondes/5000 millisecondes apres pendant lesquels vous pouvez positionner,fermer votre form, etc...
Label1.Text = Now
hbwait(5000)
Label1.Text = Now
 Conclusion
02/2003 : ... j'ai decouvert le system de threading en vb.net ... ce code ne sert donc à rien du tout. mais on ne peux pas supprimer ses codes donc...
03/2007 : mmm n'importe quoi, on ne fait pas tout en multithreading ^^, j'ai eu à nouveau besoin d'utiliser cette methode sur un recent projet ^^, cependant, ajout d'un sleep de 1ms, qui peut en effet peut etre reduire la précision, mais qui evite de faire tourner le procésseur à 100% pendant tout l'attente :)
 Historique
- 04 mars 2007 22:38:38 :
- ajout d'un sleep de 1ms, qui peut en effet peut etre reduire la précision, mais qui evite de faire tourner le procésseur à 100% pendant tout l'attente :)
 Sources du même auteur
 Sources de la même categorie
 Commentaires et avis
 Discussions en rapport avec ce code source dans le forum
PAUSE SYSTEM [ par QuiGonJinn ]
Bonjour, JE souhaiterai que mon appli fasse son traitement, puis dorme pendant X secondes... La OK un sleep et puis l'affaire est réglée... Ma
condition d'attente [ par darthpolor_I ]
bonsoir a tousmon probleme est le suivant:je dois realiser une une procedure qui fait une boucle en lisant un fichier txt mais je dois attendre une ce
VBNET pause...sleep...pause...sleep... [ par bimbo777 ]
Bonjour,J'ai un petit soucis en vbnet...je suis en train de créer une appli qui traite des taches...mon soucis c'est que toutes les taches s'ench
pb d'attente [ par sobullshit ]
Bonjour,Petit problème tout con:Lors de l'éxecution de mon programme je dois attendre le passage d'une variable à true pour poursuivre mon calcul. Or
Attente paradoxale ! [ par Marneus73 ]
Bonjour à tous,Encore un pb, de toute façon, je n'ai que ça !!! Je voudrais qu'un webbrowser affiche une page web et attende 10 secondes avant d'en ou
Sleep / Wait [ par ymerej ]
Bonjour,quel est l'équivalent en VB des fonctions comme Sleep(5), wait(5) qui permet d'attendre 5 secondes ?Vous allez me dire qu'on peut passer par u
Pb avec la pause dans un programme [ par EvilGost ]
Bonjour à toute la communauté de développeurs :)J'ai un petit problème avec une fonction de pause que j'ai pris sur VBfrance, la v
Faire une pause dans un programme [ par Tweet75 ]
Bonsoir, j'aimerais connaitre les différents moyen de faire une pause dans un programme. Je m'explique. L'utilisateur saisie une donnée dans une text
Sleep VB qui plante [ par lokomass ]
Bonjour a tous, J'utilise la fonction Sleep suivante sous VB : [code=vb]Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)[/co
Excel interop - pause dans thread [ par etniqs ]
Salutations, Je controle des calculs dans excel à partie d'une appli externe (excel.interop). Pensez-vous qu'il est possible de faire une 'pause' da
|
Derniers Blogs
 [DESIGN PATTERNS] PARTIE 2: DIP: DEPENDENCY INVERSION PRINCIPLE[DESIGN PATTERNS] PARTIE 2: DIP: DEPENDENCY INVERSION PRINCIPLE par tja
C'est le dernier principe des principes du Design Orienté Objet (The Principles of Object Oriented Design) fondés par Robert C. Martin plus connu sous le pseudonyme d'Uncle Bob.
l'image empruntée de LosTechies.
Je ne traite pas les principes dans...
Cliquez pour lire la suite de l'article par tja TECHDAYS PARIS 2010 : SHAREPOINT 2010 POUR LES DéVELOPPEURSTECHDAYS PARIS 2010 : SHAREPOINT 2010 POUR LES DéVELOPPEURS par ROMELARD Fabrice
Animé par: Laurent Cotton Le développement dans SharePoint 2010 passe par plusieurs axes qui seront évoqués dans cette session, mais plus particulièrement les développements simples lié au besoin Business Business Connectivity Services Ce BCS es...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice TECHDAYS PARIS 2010 : PLEINIèRE DERNIER JOURTECHDAYS PARIS 2010 : PLEINIèRE DERNIER JOUR par ROMELARD Fabrice
Cette session est la dernière pleinière de ces 3 jours de TechDays Paris 2010. Généralement, cette troisième journée est plus axée sur l'avenir vu par Microsoft. Après un retour sur l'avenir vu par la Science Fiction ou par ...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice UNE JOLIE-HORLOGE ET PAS QU'UN PEU !UNE JOLIE-HORLOGE ET PAS QU'UN PEU ! par neodante
Pour les possesseurs d'iPhone, ça y est Bijin Tokei - qui se traduit littéralement en Français par " Jolie Horloge " - est arrivé et GRATUITEMENT s'il vous plaît ! Après la version Tokyo, Hokkaido, night club, racing, Gal, "pour les mademoiselles'", . voi...
Cliquez pour lire la suite de l'article par neodante TECHDAYS PARIS 2010 : CONNECTEZ VOS DONNéES à SHAREPOINT 2010 AVEC LES BUSINESS CONNECTIVITY SERVICESTECHDAYS PARIS 2010 : CONNECTEZ VOS DONNéES à SHAREPOINT 2010 AVEC LES BUSINESS CONNECTIVITY SERVICES par ROMELARD Fabrice
Animé par: Gaetan Bouveret et Julien Chomarat Business Connectivity Services (BCS) est dans SharePoint 2010 la version 2 de Business Data Catalog (BDC dans SharePoint 2007). Il s'agit de la solution permettant de visualiser des données provenan...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice
Forum
 RE : VB.NETRE : VB.NET par nhervagault
Cliquez pour lire la suite par nhervagault HTML VERS PDF HTML VERS PDF par 20cent
Cliquez pour lire la suite par 20cent
Logiciels
 DB-MAIN (9.1.0)DB-MAIN (9.1.0)DB-MAIN is a data-modeling and data-architecture tool. It is designed to help developers and anal... Cliquez pour télécharger DB-MAIN Xilisoft DPG Convertisseur (5.1.37.0120)XILISOFT DPG CONVERTISSEUR (5.1.37.0120)Xilisoft DPG Convertisseur offre aux fans de Nintendo DS une bonne solution leur permettant de dé... Cliquez pour télécharger Xilisoft DPG Convertisseur GraphicsGale (2.01.01)GRAPHICSGALE (2.01.01)GraphicsGale est un logiciel de PixelArt avec de nombreuse fonctionnalités permettant de réalisé ... Cliquez pour télécharger GraphicsGale Architecte 3D (Platinum 2010)ARCHITECTE 3D (PLATINUM 2010)Architecte 3D Platinium vous permet de concevoir facilement les plans votre future maison, de l'é... Cliquez pour télécharger Architecte 3D TeamViewer 5 (TeamViewer 5)TEAMVIEWER 5 (TEAMVIEWER 5)Dépanner un ami,expliquer une manipulation devient un jeu d'enfant.
Prise en main d'un autre ord... Cliquez pour télécharger TeamViewer 5
|