Capture Elapsed time while query runs

[Guest]

Can anyone give any pointers how to capture the Elapsed time while a set of
query run? My background is more sql driven and I could write this into to a
table,but Ideally I'd like to just display it in a message box.
Thanks,

 

[Douglas J. Steele]

Depending on how precise a count you want, it can be as easy as setting a
variable to the value of Now before you start, then setting another variable
to the value of Now when you stop. Use DateDiff to figure out the elapsed
time between them.

 

[TC]

dim x as single
x = timer()
docmd.openquery ...
x = timer() - x
msgbox x & " seconds"

HTH,
TC (MVP Access)
http://tc2.atspace.com