Preguntas sobre programación de VB, utilice la voz para escribir

Para la pregunta (1), simplemente escriba el siguiente código en la subrutina:

x = InputBox("Por favor escriba n")

Para n = 1 A x

s = s + n * (n + 1) * (n + 2)

Siguiente n

MsgBox "Cuando n= " & x & ",s=" &s