vb中case的一个问题
a = CDbl(Text1.Text)
Select Case a
Case a <= 79
Label2.Caption = "中"
Case Is <= 89
Label2.Caption = "良"
Case Is <= 100
Label2.Caption = "优"
End Select
为什么输入-1它会运行第一条case
a=abs(int(a/10))
case a
case 0,1,2,3,4,5,6,7
case 8
case 9,10
case a
case 0,1,2,3,4,5,6,7
case 8
case 9,10
温馨提示：内容为网友见解，仅供参考
第1个回答 2012-06-21
没错啊,-1<=79,满足第一个case的条件追问
no，其实它输入其他数值是不执行这条的
第2个回答 2012-06-22
为什么你得Case Is <= 89，，应该是Case a <= 89追问
换成a<是不行的，不计算。有没有谁能指点下呢？我不要a可以计算的，只是我不知道为什么加个a就不行了，就算是case要与select case对应，不能写不等式，那为什么我输入-1，就能通过计算呢（中的那条）？
追答a = CDbl(Text1.Text)
Select Case a
Case 1 to 79
Label2.Caption = "中"
Case 80 to 89
Label2.Caption = "良"
Case 90 to 100
Label2.Caption = "优"
End Select
相似回答
