用vb编程 任意输入一整数,判断其奇偶性.

问题描述:

用vb编程 任意输入一整数,判断其奇偶性.

dim i as integer
i=text1.text
if i mod 2 =0 then
msgbox "偶数"
else
msgbox "奇数"
end if