Browse DevX
Sign up for e-mail newsletters from DevX

Tip of the Day
Language: Visual Basic Classic (6 and earlier)
Expertise: Intermediate
Apr 27, 2009

Measuring A Program's Speed

The simplest way to measure the performance of a block of code (or an entire program) is to obtain the elapsed time. This tip shows you how.

'At the top of the form:
Private Declare Function timeGetTime Lib "winmm.dll" () As Long

'At the top of the current sub:
Dim z As Long

'Start measuring the time
z = TimeGetTime()

'Debug.Print Mid$("abc", 2, 1)

'Stop measuring the time
z = TimeGetTime() - z

'MsgBox "That took " & z & " ms!"
Zachary Edwards
Thanks for your registration, follow us on our social networks to keep up-to-date