高考问答维嘉还在快乐大本营吗:请问用VB语句怎么判断一个数是不是偶数？
来源：百度文库 编辑：高考问答 时间：2024/04/29 13:21:04
请问用VB语句怎么判断一个数是不是偶数，程序要怎么编，谢谢
数学的方法:判断一个数(整数)的末尾是不是0,2,4,6,8就可以,当然-2,-34也是偶数.
代码:
s=>输入的数,数据类型LONG
m=>用于保存数字的末尾,STRING类型
m=right(s,1)
if m<>"0" and m<>"2" and m<>"4" and m<>"6" and m<>"8" then
msgbox "不是偶数!"
else
msgbox "是偶数!"
end if
if x mod 2 =0 then
msgbox "是偶数"
end if
=======================
mod 取余数 x mod 2 就是x除以2的余数
如果余数是0 那么就是偶数了
'可在"视图->立即窗口"中运行，但不是下面的
dim i as long
if i mod 2 =0 then
msgbox "是偶数"
end if
除以2取整
看是否等于原数