Red de conocimiento informático - Problemas con los teléfonos móviles - Utilice la programación VB para calcular la suma de números impares entre 0 y 100

Utilice la programación VB para calcular la suma de números impares entre 0 y 100

Private Sub iTest()

Dim s%, i%, ms$

Para i = 1 a 100

Si i Mod 2 = 1 entonces

s = s + i

ms = ms & vbTab & i

Siguiente i

' Imprimir "La suma de Los números impares entre 0-100 son:" & s

MsgBox "La suma de los números impares entre 0-100 es:" & s & vbCrLf & ms

End Sub