Etat d'attente sans timer

Contenu du snippet

Ce code permet de générer une attente dans l'exécution sans bouffer plein de ressources avec un Timer. Il peut être aussi utilisé pour générer des actions à intervalle variable, selon les paramètres de la fonction, plus simples que le Timer (eeeh oui, pas de conversion chiante en secondes des minutes, heures, etc...)

Source / Exemple :


Public Function attendre(intervalle As String, indice As Integer) As Integer
valeur = Time
tmp = DateAdd(intervalle, indice, valeur)

Do While Time <> tmp
     'on peut mettre ce qu'on veut ici, si on veut exécuter une action pendant x temps
Loop

End Function

Conclusion :


euh, ben c'est tout... le code est tout simple donc y'a pas grand chose à ajouter...Ah, si!
le paramètre intervalle:
"s" = secondes
"m" = minutes
"h" = heures
"j" = jours
pas la peine d'aller au delà!?

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.