Visual Basic - Problemas con desarrollo de programa

Hola amigos,
Estoy atorado con el desarrollo de un programa, y me gustaría que me ayudaran:
¿Cómo puedo establecer un hacer que un ciclo saque su resultado antes de haber acabado, lo imprima y luego continúe el ciclo de nuevo, despues imprima su segundo resultado?
Do While Not EOF(nFileNum)
Line Input #nFileNum, sNextLine
sNextLine = lLineCount & " " & sNextLine
sText = sText & sNextLine
lLineCount = lLineCount + 1
Loop
TextBox1.Text = sText

Necesito que despues de la linea que empieza con sNextLine, imprima el resultado que lleva, y que después, en la segunda vuelta, imprima en otro lado el resultado no. 2

¿Como hago para que al dar click a un botón este abra otro formulario distinto?

Agradezco cualquier ayuda con cualquiera de las dos preguntas.

Pues tu pregunta no se entiende muy bien

Quieres que imprima donde ? En un TextBox o en la Impresora o donde ?

Si quieres que un ciclo vaya mostrando el resultado en un TextBox se pede utilizar la instruccion DoEvents o Text1.Refresh

Si quieres que se haga un retraso para ir viendo el resultado, entonces puedes utilizar la Api Sleep.. que se utiliza :

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

Y lo utilizas : Sleep 1000

100 es en milisegundos, osea 1 segundo. El problema con este codigo es que retrasa toda la Pc.. otra soclucion seria esta :

Sub Delay(pdblSeconds As Double)

Const OneSecond As Double = 1#/(1440# * 60#)

Dim dblWaitUntil As Date
dblWaitUntil = Now + OneSecond * pdblSeconds
Do Until Now>dblWaitUntil
Sleep 100
DoEvents ' Allow windows message to be processed
Loop

End Sub

Y lo utilizas : Delay 1

En este ultimo el 1 es 1 segundo