Código de programación VB, una matriz que contiene diez elementos. 1, 3, 5, 7, 9, 11, 13, 15, 17, 19 se generan primero en la pantalla
Subcomando privado1_Click()
Atenuar a(9), temp
Para i = 0 a 9
a(i) = i * 2 + 1
Imprimir a(i);
Siguiente i
Imprimir Chr(10)<
Para i = 0 a 9
Si i < 5 Entonces
temp = a(i)
a(i) = a(i + 5)
a( i) = a(i + 5)
a(i + 5) = temp
Finalizar si
Imprimir a(i);
Siguiente i
Fin Sub.