Programación VB para realizar cálculos numéricos

Subcomando privado1_Click()

¡Dim n, i, resultado!

resultado = 1

n = InputBox("Por favor, introduzca N")

Para i = 1 Para n

resultado = resultado * i

Siguiente

Texto1 = resultado

Fin del subtítulo