中山到浙江专线:vb编程一题

来源：百度文库 编辑：杭州交通信息网 时间：2024/05/05 15:01:10
任意输入一个数，判断该数是否为偶数，如果是，则用msgbox函数输出“YES”，否则输出“NO”。
给我编个程，多谢了

Dim a As Integer
a = InputBox("输入一个数", "输入")
If (a Mod 2 = 0) Then
MsgBox ("YES")
Else
MsgBox ("NO")
End If

假设你输入的数是变量a
if a mod 2=0 then
msgbox "yes"
else
msgbox "no"
end if

如果x mod 2 = 0，则x就是偶数

vb编程一题 一道高一VB编程题 一道高一vb编程题 VB编程菜鸟题 一道vb编程题 一个vb编程题 vb 编程题 一道VB编程题 VB编程题 VB编程题