30/09/2008, 14:43
|
 | | | Fecha de Ingreso: noviembre-2003
Mensajes: 959
Antigüedad: 20 años, 6 meses Puntos: 19 | |
| Respuesta: Ayuda en Visual Basic 6
Código:
Dim Nombres(1 To 20) As String
Private Sub Form_Load()
Dim X As Integer
For X = 1 To 20
Nombres(X) = InputBox("Ingrese el nombre")
Next X
Dim Listadodenombres As String
For X = 1 To 20
Listadodenombres = Listadodenombres & vbNewLine & Nombres(X)
Next X
MsgBox "LOS NOMBRES SON: " & vbNewLine & Listadodenombres
End Sub
|