dim x
x = -2
if x < 0 then
msgbox("x < 0")
elseif x = 0 then
msgbox("x = 0")
else
msgbox("x > 0")
end if
select case x
case 1
msgbox("x = 1")
case 2
msgbox("x = 2")
case else
msgbox("x = ?")
end select
vbs教程《条件语句》
最新推荐文章于 2024-05-18 21:43:20 发布