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教程《条件语句》
条件判断与选择案例
最新推荐文章于 2025-07-11 16:43:04 发布

1万+

被折叠的 条评论
为什么被折叠?



