Timer VBA < 1s

Timer VBA < 1s - VB/VBA/VBS - Programmation

Marsh Posté le 19-02-2008 à 13:35:26    

Bonjour,
 
Quelqu'un connait-il un timer VBA capable de compter en dessous de la seconde??
 
En ms ce serait le pied!!!

Reply

Marsh Posté le 19-02-2008 à 13:35:26   

Reply

Marsh Posté le 19-02-2008 à 16:19:49    

J'utilise l'API Windows GetTickCount() qui se déclare ainsi

Declare Function GetTickCount Lib "kernel32" Alias "GetTickCount" () As Long


Elle travaille en ms écoulées depuis l'ouverture de la session windows.

 

Si c'est vraiment un contrôle Timer que tu veux (déclenchement d'évènement à intervalle), je ne sais pas.


Message édité par tegu le 19-02-2008 à 16:21:21
Reply

Marsh Posté le 19-02-2008 à 16:43:04    

Oui je voudrais effectivement pouvoir le déclencher quand je veux!!
 
C'est pour une applic de dialogue entre le (fucking) VBA d'Excel et une commande numérique!!  
 
Pfff ben ça va pas tout seul :-) !!!
 
Merci tegu

Reply

Marsh Posté le 19-02-2008 à 16:45:55    

Dans le même type de réponse que celle de Tegu il y a celle ci qui descend à la nanoseconde


Option Explicit
 
Private Declare Function QueryPerformanceCounter Lib "Kernel32" (X As Currency) As Boolean
Private Declare Function QueryPerformanceFrequency Lib "Kernel32" (X As Currency) As Boolean
 
Dim Depart As Currency, Fin As Currency, Freq As Currency
 
QueryPerformanceCounter Depart
.....
QueryPerformanceCounter Fin
QueryPerformanceFrequency Freq
 
Debug.Print "Temps écoulé : " & ((Fin - Depart) / Freq) * 1000000000 & " ns"


 
Le Timer VB6 descend à la milliseconde,enfin je crois, de mémoire
car tu dois utiliser qqch comme


Application.Wait Now + TimeValue("00:00:01" )


 
Sinon via Gog j'ai trouvé cela http://www.vbfrance.com/code.aspx?ID=39308 ( pas testé )


Message édité par kiki29 le 19-02-2008 à 17:03:22
Reply

Marsh Posté le 19-02-2008 à 17:19:09    

Merci kiki29  
 
Le problème que je rencontre c'est que je dois vraiment pouvoir gérer ma tempo de manière autonome (avec le On Time ou le On Expired)
 
Je vais essayer le truc à mimiZanZan... mais je pense que c'est le timer que je possède déjà et qui ne descend pas en dessous de la seconde!!
 
 

Reply

Marsh Posté le 19-02-2008 à 17:41:54    

Reply

Marsh Posté le 19-02-2008 à 19:28:37    

Ouais ben finalement je crois que le timer de l'ami mimiZanzan est pas si mal que ça (en tout cas on peut choisir un interval de 1ms)
 
Faut encore que je vois s'il s'intègre comme je veux dans mon applic!!
 
Encore une fois, merci kiki29

Reply

Sujets relatifs:

Leave a Replay

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