SUMAR LOS DÍGITOS DE UN NÚMERO CON POWER APPS

Hola a todos,

Hoy os traigo un ejercicio de suma de números. El ejercicio trata de sumar todos los dígitos que componen un número usando Power Apps, es decir, si pongo 1234 el resultado debe ser 1+2+3+4: 10

Para hacer este ejercicio voy a aprovechar y voy a construir un código que sea capaz de generar números de forma aleatoria entre el 1 y el 9 y con el largo que especifiquemos.

Para ello os presento esta pantalla:

Como podéis ver, en un TextInput indicamos el largo de nuestro número, en este caso el 10 y se generará de forma aleatoria un número con 10 dígitos. Y la suma de todos esos números es 36.

El código lo vamos a incluir en el botón en la propiedad OnSelect:

//Borramos totales
Set(SumaResultado;Blank());;

//generamos colección con el largo especificado y números aleatorios entre 1 y 9
ClearCollect(NumerosAleatorios; ForAll(Sequence(TextInput1.Text); {Numero: Text(RandBetween(1; 9))}));;
Set(CadenaNumerica; Concat(NumerosAleatorios; Numero));;

//Pasamos los elementos a una colección
ClearCollect(Digitos; 
    ForAll(
        Sequence(Len(cadenaNumeros.Text)); 
        {Digito: Value(Mid(cadenaNumeros.Text; Value; 1))}
    )
);;
//sumamos los elementos de la colección y los pasamos a la variable
Set(SumaResultado; Sum(Digitos; Digito))

En el label denominado cadenaNumeros vamos a incluir la variable CadenaNumerica en la propiedad Text y que es el número que hemos generado.

Y por último en el label Resultado vamos a incluir en la propiedad Text la variable SumaResultado y que nos mostrará la suma de todos los dígitos.

Creo que el código está bien comentado y espero que no tengáis dudas.

La suma funciona muy bien, por ejemplo 1.500 números:

Y esto es todo, espero que sea de utilidad.