29/05/2006, 22:39
|
 | | | Fecha de Ingreso: abril-2004 Ubicación: 62º 06' 18" O / 33º 07' 47" S
Mensajes: 331
Antigüedad: 21 años Puntos: 1 | |
| Declara esta funcion:
Private Declare Function GetTickCount Lib "kernel32" () As Long
Usala asi:
Dim inicio as long
inicio = GetTickCount
'Caundo queres saber cuanto pasó
msgbox GetTickCount - inicio 'El resultado es en milisegundos
Espero te sirva, un saludo
__________________
Marcos
El dinero no da la felicidad... démelo y sea feliz!!! |