Para realizar las sumas consecutivas es necesario crear los siguientes formularios, tal y cual sin realiza modificaciones a menos que se tenga cierto grado de conocimientos, los dejaremos por defecto para arrancar con los programas, para ello dejare una imagen de cómo es que tiene que quedar.
Una vez listo los formularios procedemos a pegar el siguiente código para arrancar el programa
Private Sub CommandButton1_Click()
Dim num As Integer
num = Val(TextBox1)
For i = 1 To num
respuesta = respuesta + i
Next
TextBox2 = respuesta
End Sub
TextBox2 = respuesta
End Sub
Nota: En lo posible no modificar nada.
End Sub
Nota: En lo posible no modificar nada.
No hay comentarios.:
Publicar un comentario