select case a
case 1
msgbox "1"
case 2
msgbox "2"
case ....
msgbox "......"
case n
msgbox "n"
case else
msgbox "n+1"
end select
end sub
变量或属性
如：
select case a
case 1
beep
case 2
msgbox"1+1=2"
case else
inputbox "1+1=?"
end select
转换成if为：
if a =1 then
beep
Elseif a=2 then
msgbox"1+1=2"
else:inputbox "1+1=?"
end if
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024