vb中用循环语句做1+2+3……+100的偶数和,和,奇数和 越简单越好.

Private Sub Command1_Click() For i = 1 To 100 If i Mod 2 = 0 Then ou = ou + i If i Mod 2 0 Then ji = ji + i Next i Print "偶数和为" & ou Print "奇数和为" & ji End Su