SELECT CASE BETWEEN

I thought there was a BETWEEN operator for SELECT/CASE

because this doesn’t work

        Select Case temp
        Case Is <4.0
          dat(4)=dat(4)+"LOW"
        Case Is >=4.0 , Is <7.0
          dat(4)=dat(4)+"Excellent"
        Case Is >=7 , Is <8.0
          dat(4)=dat(4)+"Good"
        Case Is >=8 , Is <10
          dat(4)=dat(4)+"HIGH!"
        Case Is >=10
          dat(4)=dat(4)+"VERY HIGH!"
        End Select

it seems to be OR, not AND

Select Case temp Case Is <4.0 dat(4)=dat(4)+"LOW" Case 4.0 To 6.9 dat(4)=dat(4)+"Excellent" Case 7 To 7.9 dat(4)=dat(4)+"Good" Case 8 To 9.9 dat(4)=dat(4)+"HIGH!" Case Is >=10 dat(4)=dat(4)+"VERY HIGH!" End Select

except there are values between 6.9 and 7.0… I didn’t want to have to round things

I would try it like this:

Select Case temp
Case Is <4.0
dat(4)=dat(4)+“LOW”
Case Is <7.0
dat(4)=dat(4)+“Excellent”
Case Is <8.0
dat(4)=dat(4)+“Good”
Case Is <10
dat(4)=dat(4)+“HIGH!”
Case Is >=10
dat(4)=dat(4)+“VERY HIGH!”
End Select

Don’t forget about ‘else’

Select Case temp
Case Is <4.0
dat(4)=dat(4)+“LOW”
Case Is <7.0
dat(4)=dat(4)+“Excellent”
Case Is <8.0
dat(4)=dat(4)+“Good”
Case Is <10
dat(4)=dat(4)+“HIGH!”
else
dat(4)=dat(4)+“VERY HIGH!”
End Select

  Select Case true
    Case temp <4.0
      dat(4)=dat(4)+"LOW"
    Case temp >=4.0 and temp  <7.0
      dat(4)=dat(4)+"Excellent"
    Case temp >=7 and temp  <8.0
      dat(4)=dat(4)+"Good"
    Case temp >=8 and temp <10
      dat(4)=dat(4)+"HIGH!"
    Case temp >=10
      dat(4)=dat(4)+"VERY HIGH!"
    End Select

[quote=173142:@Dave S]I thought there was a BETWEEN operator for SELECT/CASE

because this doesn’t work

        Select Case temp
        Case Is <4.0
          dat(4)=dat(4)+"LOW"
        Case Is >=4.0 , Is <7.0
          dat(4)=dat(4)+"Excellent"
        Case Is >=7 , Is <8.0
          dat(4)=dat(4)+"Good"
        Case Is >=8 , Is <10
          dat(4)=dat(4)+"HIGH!"
        Case Is >=10
          dat(4)=dat(4)+"VERY HIGH!"
        End Select

it seems to be OR, not AND[/quote]

you can use

[code]select case X
case 4 to 6.99999999

end select[/code]

to reasonably implement 4 <= X < 7