La programación VB utiliza 25 números enteros positivos de dos dígitos para aleatorizar una matriz de 5X5 ¡Resuélvelo!

Subcomando privado1_Click() Aleatorizar (temporizador) Atenuar i como entero, j como entero, intArray(5, 5) como entero, intCount como entero para i = 1 a 5

Para j = 1 a 5

? intArray(i, j) = Int(Rnd(i * j) * 90 + 10)

?Si intArray(i, j) = 25, luego intCount = intCount + 1

?Imprimir intArray(i, j);

Siguiente j

Imprimir siguiente i

Imprima "25 ocurrencias" & intCount & "veces".

Imprimir

Fin Sub.