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

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/28 02:01:10
用VB分别求出100以内的奇数和、偶数和

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

用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 希望你满意