Tema: PRINT xD
Ver Mensaje Individual
  #1 (permalink)  
Antiguo 26/07/2008, 10:58
null
 
Fecha de Ingreso: mayo-2008
Mensajes: 45
Antigüedad: 17 años
Puntos: 0
PRINT xD

estaba practicando algo pero ¬_¬ :

Dim a As String
Dim cr As Integer
Private Sub Form_Load()
cr = InputBox("Ingrese cantidad de repeticiones", "Repeticiones")
For i = 1 To cr
a = InputBox("Ingresar nombreS", "Nombres")
Next i
For i = 1 To cr
mensaje = MsgBox("Los nombres son: " & a, , "Nombres")
Next i
For i = 1 To cr
Form1.PrintForm = a
Next i
End Sub

Me tira error en PRINT
como se escribe el formulario ?
con un boton se pone print, pero siguiendo una instruccion desde el mismo form
algo esi puede ser ? PRINTFORM
la verdad me tira error x)

Saludos!