Para ejecucion en VB

[alcohol]

Hola,

Necesitaria para la ejecucion dentro de una funcion un determinado tiempo ( muy poco 10 milisegundo aproximadamente), hay alguna forma de hacerlo sin ningun timer.
Si no hay mas opciones que utilizar un timer ¿ se puede crear el evento timer() en tiempo de ejecucion mediante codigo?

[Mickel]

dos soluciones posibles:
- usar sleep
- o, ya que es poco tiempo, haz un codigo de este tipo
dim i
for i=1 to 1000
next

[alcohol]

Uso VB6 y sleep no lo reconoce como una funcion.
Habia utilizado el for pero realmente no hace una parada perceptible.

[Jorge_Mota]

esto es por que Sleep es una llamada al Api de Windows
debes declarala antes de poder usarla

Ejemplo tomado de AllApi.Net

'This project needs a button
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub Command1_Click()
'KPD-Team 1998
'URL: http://www.allapi.net/
'E-Mail: [email protected]
Me.Caption = "Your system will sleep 5 sec."
'Sleep for 5000 milliseconds
Sleep 5000
Me.Caption = ""
End Sub
Private Sub Form_Load()
Me.Caption = ""
Command1.Caption = "Sleep ..."
End Sub

[alcohol]

Tengo sleep dentro de este bucle
Do While linea2.X2 < xFinal
linea2.X2 = linea2.X2 + 400
Sleep 120
Loop
pero se para solo al principio, cuando ocurre el evento, pero dentro del bucle no hace ninguna interrupcion