用VB分别求出100以内的奇数和、偶数和

发布时间：2021-02-22 20:47:47

用VB分别求出100以内的奇数和、偶数和

网友回答

Dim i As Long Dim j As Long Dim k As Long For i = 0 To 100 If i Mod 2 = 0 Then j = j + i Else k = k + i Next MsgBox 偶数和： & j & vbCrLf & 奇数和： & k 希望你满意
以上问题属网友观点，不代表本站立场，仅供参考！