Código de solicitud del formulario del sistema de gestión de libros
¿Cuándo quieres esta tarea?
¿Privado? ¿Sub? Command1_Click()
¿Atenuar? ¿norte? ¿Como? Entero
¿Atenuado? ¿suma? ¿Como? ¿Doble
suma? =?0
n? =?InputBox("Ingrese un valor para n")
¿Para qué? ¿I? =?1?¿Adónde ir? n
suma? =?suma? ?Jie Cheng (1)
¿Siguiente? ¿Yo
imprimo? Suma
¿Fin? Submarino
¿Público? ¿Función? ¿Jiecheng (por valor? n? como? entero)? ¿Como? ¿Dos veces más tenue
¿Oscuro? jc? ¿Como? ¿Dos veces
jc? =?1
¿Para qué? ¿I? =?1?¿Adónde ir? n
jc? =?jc? *?Yo
Entonces
¿Jie Cheng? =? (Igual que jurisconsulto) Jurista
Fin? Función