Auteur

MVP Office Access 2003, 2004, 2005 et 2006

Qui sont les MVP ?

 
 

Codes pour Access

 -  Base de données
+ Administrateur
+ Table
+ Requête
+ Formulaire
+ Dates & Heures
+ Nombre
+ Math
+ Fichier
+ Commandes externes
+ Automation
+ Equivalence
 
 

Tuto Access 2007

+ Base de données
 
 

Lettre d'information

Pour avoir des nouvelles de ce site, inscrivez-vous à notre Newsletter.
S'abonner
Se désabonner

captcha
Merci de recopier le code alphanumérique ci-dessus
114 Abonnés
 
 

Base de données - Temps d'exécution d'une fonction

Description 

Cette fonction permet de connaître en millisecondes le temps d'exécution d'une fonction.

 
Syntaxe 

TimeOfFunction(strFunction[, lngX])

La syntaxe de la fonction TimeOfFunction comprend les éléments suivants :

ElémentsDescription

strFunction

Expression de chaîne correspondant au nom de la fonction dont on souhaite connaître le temps d'exécution. Si cette dernière a des arguments obligatoires, il conviendra de les renseigner dans cette variable.
lngXFacultatif. Valeur numérique correspondant au nombre de fois que l'on souhaite se faire répéter la fonction. La valeur par défaut est 1, si la fonction a tester est longue a s'exécuter, cette argument n'est pas nécessaire.
 
Exemple 

Debug.Print "Test Fonction1", TimeOfFunction ("Fonction1('argument texte fonction1')",5)

 
Code de la fonction 


 

Public Function TimeOfFunction(strFunction As String, Optional lngX As Long = 1) As Long

'** Fonction permettant de tester le temps
'** d'exécution d'une fonction

Dim sngStart As Single
Dim sngEnd As Single
Dim i As Long

sngStart = Timer
For i = 1 To lngX
    Eval (strFunction)
Next
sngEnd = Timer
TimeOfFunction = (sngEnd * 1000) - (sngStart * 1000)

End Function

 


Date de création : 14/09/2006 @ 16:36
Dernière modification : 12/06/2007 @ 13:02
Catégorie : Base de données
Page lue 1261 fois


Prévisualiser la page Prévisualiser la page     Imprimer la page Imprimer la page

 
 

Réactions à cet article


Personne n'a encore laissé de commentaire.
Soyez donc le premier !


 
 

Recherche




Google

 
 

Préférences

Votre nom (ou pseudo) :

Votre mot de passe :

     


Membres 76 Membres

membres les 10 derniers :
jujubegood   Rachid   fifimeyrou   MoxQwoidT   fof_alaz   bellemeche   Bruno   fatima   foubay   feever   
Membre en ligne : Membre en ligne :
( personne )
Anonymes en ligne : Anonymes en ligne : 2

Total visites : Total visites : 117980  
hit Affluence record: 102
le 17/06/2007 @ 07:36

Ecrire à Jessy SEMPERE Ajouter aux favoris Recommander ce site à un ami Version mobile
 
 


Design Jessy © 2007 - Compatible IE6, IE7 et Mozilla 2.0.0.1

  Site créé avec GuppY v4.5.18 © 2004-2005 - Licence Libre CeCILL

Document généré en 0.08 seconde