Visual Basic - para la ejecucion

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?

Lo puedes hacer usando algunas funciones API. Te pongo un ejemplo de como hacer un retardo de 10 milisegundos con tres funciones distintas:

Private Sub Form_Click()
Dim aux As Long
'Retardo usando GetTickCount
aux = GetTickCount
Do
Loop While GetTickCount < aux + 10
'Retardo usando timeGetTime()
aux = timeGetTime
Do
Loop While timeGetTime < aux + 10
'Retardo usando Sleep()
Sleep 10
End Sub

En el ejemplo anterior no te copie las declaraciones necesarias, te las pongo aquí:

Private Declare Function GetTickCount Lib "kernel32" () As Long
'Devuelve el nº de milisegundos transcurridos desde que se inició el sistema
Private Declare Function timeGetTime Lib "winmm.dll" () As Long
'Lo mismo que GetTickCount pero con más precisión
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
'Suspende la ejecución durante el intervalo especificado en dwMilliseconds

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