Programación VB: Los cuatro números 2345 pueden generar arbitrariamente números de cuatro dígitos con diferentes dígitos.

Esta es una cuestión de permutación completa. Como no soy bueno en VB, solo te daré un algoritmo recursivo. El siguiente pseudocódigo:

Permutación de función (matriz de referencia). , límite izquierdo m, límite derecho Límite n)

{

if(mlt; n-1){

permutación(a, m 1, n) ;

for(la variable i cambia de m 1 a n-1){

Intercambiar a[m] y a[i]

permutación(a, m 1, n);

Intercambiar a[m] y a[i]

}

}else{

Emitir el secuencia de matriz completa para indicar que se ha encontrado una solución

}

}

Al llamar, escriba la permutación (a, 0, el número de elementos a) ;

Nota: a Los subíndices comienzan desde 0