Mensajes

[DoEvents¡!]

Un ej:

Código (vb) [Seleccionar] Expandir

Option Explicit
Private Declare Function GetTickCount Lib "kernel32" () As Long

Private Sub Form_Load()
   Dim t1 As Long
   Dim t2 As Long
 
   t1 = GetTickCount '1ª marca

   'Call Function
 
   t2 = GetTickCount '2ª marca
   
   MsgBox t2 - t1    'Resultado = diferencia entre marcas.

End Sub

DoEvents¡!

[cTiming.cls]

Una duda:

Como mido el tiempo?

Con:

cTiming.cls

o con:

Código (vb) [Seleccionar] Expandir

Private Declare Function GetTickCount Lib "kernel32" () As Long

DoEvents¡!

Ban Ban Ban!!!

[LeandroA > PsYkE1 > Karcrack]

Hola y no es valido asi?

Código [Seleccionar] Expandir


Private Function ItoA03(lNumb As Long) As String
    ItoA03 = lNumb
End Function


Jajajajajajaja
Aun mas rapido que el mio!!

LeandroA > PsYkE1 > Karcrack


DoEvents¡!

[PD]

Mira el mio:

Código (vb) [Seleccionar] Expandir

Public Function ItoA02(ByVal lNumber As Long) As String
   ItoA02 = CStr(lNumber)
End Function


PD: Si soy sincero no se ni por donde empezar...

DoEvents¡!

[DoEvents¡!]

 
Ok tu ganas...

DoEvents¡!

[For]

WOow que bueno!!
A ver si cuando acabe examenes me meto a tope con bytes. 
Tu code es muy sencillo y eficaz!

Una cosilla de nada:
Si quitas el indicador en el For ahorras un poquitin (muy poco) de tiempo...
http://foro.rthacker.net/programacion-visual-basic/como-acelerar-codigo-en-vb6/

DoEvents¡!

[DoEvents¡!]

Intentaron hacer pishing conmigo!

Bienvenido al club

DoEvents¡!

[DoEvents¡!]

Que bonito el hacking ético ^^

Amen...
Me parece vergonzoso...

DoEvents¡!

[DoEvents¡!]

Código (vb) [Seleccionar] Expandir


Public Function ReplaceFilter(ByVal sFilter As String) As String
    ' ...
    ReplaceFilter = Replace$(ReplaceFilter, " ", "|")
    ' ...
End Function


Sabes lo que pasaria si busco "el archivo con espacios en el nombre.doc"?

EDIT: Intenta poner eso en el buscador y winxp empieza a tirar fruta  , asi que, esta bien tu codigo

Edit: En windows 7 no funciona poner "*.mp3 *.wav" porque no devuelve nada jeje...

Oops, no habia contado con eso...
Bueno aun asi solo hay que hacerle una pequeña modificacion...

DoEvents¡!