Question

vb 题目求解释详细谢谢！！

xcase=1
t=inputbox("input value of t:")
select case t
case t>0
y=xcase+1
case t=0
y=xcase+2
case else
y=xcase+3
end select
print xcase;y
运行时从键盘输入1 答案是1 4
为什么？还有题目里的case else 代表什么意思？小于0？还是其他？

Answer 1

这是因为你把select分支结构理解错了，所以无法获得预期结果。

改成这样：
xcase=1
t=val(inputbox("input value of t:"))
select case t
case is>0
y=xcase+1
case 0
y=xcase+2
case else
y=xcase+3
end select
print xcase;y

或者：
xcase=1
t=val(inputbox("input value of t:"))
if t>0 then
y=xcase+1
elseif t=0 then
y=xcase+2
else
y=xcase+3
end if
print xcase;y

推荐你用第二种，因为在此种场合用第二种才是最合理的。

追问

诶，你没明白，这是题目怎么会错，我就是问为什么输入1答案是 1 4为什么执行了case eles？懂？我表达这么垃圾吗

追答

呵呵，题目就是错了
select case t
case t>0
这个就是错了，还有case t=0也是错的，所以就执行case else后面的语句即y=xcase+3，因此输入1就变成4了。

case else的意思就是前面的条件都不成立的时候就执行case else后面的语句。
你的表达不垃圾，我也一眼看出你的意思了，但是代码本身有错你让我硬说它是对的么？
select case结构的正确用法是：
select Case t
case 1
......
case 2,3,4
......
case 5 to 7
......
case is > 8
......
case else
end select
以上这些case后面表达式用法都是对的，但是
select Case t
case t=0
......
case t>0
......
case t<0
......
case else

end select
这样就是错误的！当然程序本身不会出错，但是除case else外的其他分支选项都不会被选择的！
信不信由你了，难道我10多年工作经验的VB程序员对这样的初级代码还会阴沟翻船？

当然，也不排除你的老师故意出这样的题目，好让你们加深对select case结构用法的认识。

追问

那你改后的case else 是什么情况呢？算t<0吗？

追答

是的。不是说了吗，其他case条件不符的就全部进到case else了。那么除了大于０和等于０，剩下的肯定就是小于０啦