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

yk_ky3333 1年前 已收到1个回答 举报

536319550 幼苗

共回答了15个问题采纳率:93.3% 举报

例,求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

1年前

10
可能相似的问题
Copyright © 2024 YULUCN.COM - 雨露学习互助 - 16 q. 0.013 s. - webmaster@yulucn.com