como ejecutar programa en visual basic

[estefy]

mi programa es el siguiente y quisiera que me ayudaran a estructurarlo bien mas que nada en cuanto a los bucles lo que se pretende es ejecutar la pantalla tantas veces anote el numero el usuario espero me puedan a yudar

aqui empieza mi programa:

Dim aceptar As Integer
Private Sub Command1_Click()

Text2.Text = UCase(Text1.Text) + (" hola como estas")
Text3 = ""
'esta es la estructura que me mandaste ahora te pido que me
'ayudes a acomodar los bucles ya que no les he podido entender
'entre comentarios he puesto a como yo le he entendido en libro
Dim formulario As Form
Set formulario = fa.frm
fa.Show

' repeat
' Form1
'until text=""

'For aceptar = 1 To Text3.Text < 99
' Print Form1
'Next

'Do
' Form1
'Loop Until Text3 < 99

' Do Until Text3.Text < 99
' aceptar = aceptar + 1
'Loop

End Sub
Private Sub Command2_Click()
mensaje = "¿Esta seguro que desea salir?"
If MsgBox(mensaje, vbYesNo + vbQuestion, "Atención") = vbNo Then
Text1.Text = " "
Text2.Text = " "
Else
End
End If
End Sub

de antemano les agradezco cualquier ayuda que me puedan ofrecer

gracias

[Bea__avalanch]

No se si te he entendido bien.
Si lo que kieres es que te salga formularios por numero que asigne el usuario, usa un for y cargalo con una variable.

dim i as integer

private sub mostrar_forms(numero as integer)

for i=0 to numero

(codigo lo que kieres mostrar tantas veces)

exitfor (salida forzosa del for, si deseas salir antes)

next


end sub


private sub boton_click()

i=text1.text (text que le cargas en el formulario principal)

call mostrar_forms(i)
(llamada al procedimiento de rutina)

end sub




No se si te servira de algo, espero que si

Un saludo