llenado de arreglos
Publicado por merit (5 intervenciones) el 18/03/2013 06:00:53
Estoy probando apenas el llenado de un arreglo lo cual ya lo hice, pero lo que no puedo es mostrar el contenido del arreglo (visualización de datos) que es lo que está fallando, mi código es el siguiente
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Private Sub Form_Load()
'Declaración de variables
Dim a(2) As Integer 'Declaración del arreglo
Dim i As Integer 'Declaración del subindice
'Entrada de datos
For i = 0 To 2a(i) = Val(InputBox("Introduce un valor para el arreglo(" & i & ")"))
Next i
'Visualización de datos
For i = 0 To 2Print a(i);
Next i
Print 'Mueve el cursor a la línea siguiente
Print "Fin del proceso"End Sub
Valora esta pregunta
0