Red de conocimientos turísticos - Conocimientos sobre calendario chino - Chicos programación vb "Suma todos los números naturales hasta 100" (Encontrar la suma de todos los números naturales hasta 100)

Chicos programación vb "Suma todos los números naturales hasta 100" (Encontrar la suma de todos los números naturales hasta 100)

Private Sub Command1_Click()

Dim Sum como entero, i como entero

Para i=1 a 100

Suma=Suma i

Siguiente i

Imprimir "Sum="；Sum

End Sub

Imprimir "Sum="；Sum