c formulario exportar diccionario de datos
¿Privado? ¿Sub? Command1_Click()
¿Atenuar? ¿I? ¿Como? Enteros
Irregularizar
¿Para qué? ¿I? =?0?¿Adónde ir? ¿Nueve
n(i)? =?Int(Rnd?*?90)?+?10
Si? ¿I? =?0?Entonces
Máx. =?Sustantivo (1)
Mínimo? =?Sustantivo (1)
Otro
¿Si? Máx. <? n(yo)? ¿Entonces qué? Máx. =?Sustantivo (1)
¿Si? ¿Sensible? >? n(yo)? ¿Entonces qué? ¿Sensible? =?Sustantivo (1)
¿Fin? Si
suma? =?suma? +?Sustantivo (1)
Entonces
Texto1. ¿Palabra? =?Unirse(n,?",")
¿Finalizar? Submarino
¿Privado? ¿Sub? Command2_Click()
¿MsgBox? "¿Cuál es el mínimo"? y amplificador? Departamento
¿Fin? Submarino
¿Privado? ¿Sub? Command3_Click()
¿MsgBox? "¿Cuál es el valor máximo"? y amplificador? Max
¿Fin? Submarino
¿Privado? ¿Sub? Command4_Click()
¿MsgBox? "¿Cuál es el promedio"? y amplificador? ¿suma? /?10
¿Fin? Submarino