使用数字范围的案例陈述出错

Question

我收到一个错误，指出

预期结束语句

我应该使用除to之外的东西吗？我尝试过or并&并收到类似的错误。

   Dim interp As String = ""
   Select Case BmiValue
      Case Is < 18.5
         interp = "Underweight"
      Case Is <18.5 to >=24.9
         interp = "Normal"
      Case Is <24.9 to >=29.9
         interp = "Overweight"
      Case Else >/= 30.0
         interp = "Obese"

Answer 1

你需要

在代码之后有一个End Select。

Dim interp As String = "" 
Select Case BmiValue 
   Case Is < 18.5 
      interp = "Underweight"           
   Case Is <18.5 to >=24.9 
      interp = "Normal" 
   Case Is <24.9 to >=29.9 
      interp = "Overweight" 
   Case Else >/= 30.0 
      interp = "Obese"
End Select

Answer 2

终于明白了!!!!我去掉了每行中的"to"和>+ 之间的"/"，它起作用了!!!不知道为什么这次它有效，而不是我尝试不同事情的其他 100 次!!!