Case语句使用一系列数字出错

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

终于搞定了!!!!!我把＆＃39;带到了＆＃39;在每一行和＆＃39; /＆＃39;介于＆gt; +之间就可以了!!!!不知道为什么它这次工作而不是其他100次我尝试了不同的东西!!!!