Aprender a rastrear el tiempo en su programa de Visual Basic 6.0 es importante cuando se muestra la cantidad de tiempo entre las distintas acciones o al depurar el tiempo de diferentes algoritmos . La función integrada " GetTickCount " permite realizar un seguimiento de la cantidad de milisegundos que han transcurrido entre dos eventos . Restablecer el contador se hace simplemente llamar a la función " GetTickCount " de nuevo. Restando dos lecturas " GetTickCount " que da una medida del tiempo que ha pasado . Instrucciones
1

Abra el archivo VB6 en Microsoft Visual Studio 6.0
2

Declare dos variables para hacer un seguimiento de inicio y final del contador de tiempo , añadiendo el siguiente código en su función. :

lng_Beg Dim As Long

lng_End Dim As Long
3

llamar a la función " GetTickCount " para iniciar el tiempo de seguimiento con el código : < br >

lng_Beg = GetTickCount ()

la función " GetTickCount " almacena el número de milisegundos que han transcurrido desde que el sistema de encendido. Si el sistema se deja encendido durante más de 49,7 días , un desbordamiento es posible debido a que el tiempo se almacena como un valor DWORD de 32 bits . En muchos sistemas el tiempo real entre las garrapatas es 10 o 16 ms .
4

Añadir el código que desea a tiempo , tales como un bucle , el procesamiento de un archivo o recuperar información de una base de datos .
Página 5

Restablecer las garrapatas llamando a la función " GetTickCount " de nuevo, con el código :

lng_Beg = GetTickCount ()

el contador anterior está descartado < . br> 6

Finalizar el código que desee en cuando y luego llamar a la función " GetTickCount " de nuevo con el código :

lng_End = GetTickCount ()
7

Muestra la cantidad de milisegundos que han pasado desde que restablezca el contador tick con el código :

MsgBox CStr ( lng_End - lng_Beg )

" CStr " convierte el tipo de datos " Long" en una cadena imprimible.
8

Guarde el archivo VB6 y compilar y ejecutar el programa para ver cuánto tiempo se tarda en ejecutar el código.
< br >