VB中判断奇数和偶数怎么判断和统计个数

来源:学生作业学帮网 编辑:学帮网 时间:2024/05/14 05:21:48

VB中判断奇数和偶数怎么判断和统计个数

例,求1 到100之间偶数和奇数的数量
dim i as integer,a as integer,b as integer
for i=1 to 100
if i mod 2=0 '偶数
a=a+1 '偶数奇数
else '奇数
b=b+1 ‘奇数计数
end if
next