Programación VB: genere 10 datos aleatorios, guárdelos en una matriz unidimensional (el subíndice predeterminado comienza desde 1), genere los elementos de la matriz en una línea y agregue los elementos de la matriz...
Crea un nuevo proyecto, agrega un botón al formulario, ingresa el siguiente código, ejecuta y haz clic en el botón
Privado a1amp (1 a 10), a2amp (1 a 10)
Private Sub Command1_Click()
Dim b1amp;, b2amp;
Para b1 = 1 a 10
a1(b1) = Int(Rnd() * 100 )
Imprimir a1(b1);
Siguiente
Imprimir
Para b1 = 10 a 1 Paso -1
Imprimir a1(b1);
Siguiente
Imprimir
Imprimir
Imprimir "Subíndice Impar:";
Para b1 = 1 a 10 Paso 2
Imprimir a1(b1);
Siguiente
Imprimir
Imprimir " Subíndice par: ";
Para b1 = 2 a 10 Paso 2
Imprimir a1(b1);
Siguiente
Fin Sub