Red de conocimiento informático - Material del sitio web - Encuentra todos los números de 7 dígitos hasta 100 y la suma de todos los números en VB.

Encuentra todos los números de 7 dígitos hasta 100 y la suma de todos los números en VB.

Encuentra todos los números de 7 dígitos hasta 100 y la suma de todos los números.

¿Privado? ¿Sub? Command1_Click()

¿Imprimir? "Todos los números de 7 dígitos dentro del rango de 100"

¿Para qué? ¿I? =?0?¿Adónde ir? Nueve

¿Imprimir? ¿I? *?10?+?siete

s? =?s? +?(¿Yo?*?10?+?7)

Entonces

¿Imprimir? "¿La suma de todos los números?" y amplificador? s

¿Fin? Submarino