[vb.net] Select Case

    Select Case aa


        Case 1 To 1.49


            MsgBox(1)


        Case 1.5 To 2


            MsgBox(2)


        Case Else


            MsgBox("was lower than 1 or higher than 2 or between 1.49 and 1.5")


    End Select

this(below) would go into case else

   Dim aa As Double = 1.499

this(below) will go into case 1 to 1.49

   Dim aa As Double = 1.4

this(below) will go into case 1.5 to 2

   Dim aa As Double = 1.78

other way of doing it: From here

    Select Case value


        Case Is <= 49.99


            Debug.WriteLine("first group")


        Case Is <= 99.99


            Debug.WriteLine("second group")


        Case Is <= 199.99


            Debug.WriteLine("third group")


        Case Else


            Debug.WriteLine("fourth group")


    End Select

and maybe this too:

    Select Case true


        Case (value >= 0 andalso value <= 49.99)


            Debug.WriteLine("first group")


        Case (value >= 50 andalso value <= 99.99)


            Debug.WriteLine("second group")


        Case (value >= 100 andalso value <= 199.99)


            Debug.WriteLine("third group")


        Case Else


            Debug.WriteLine("fourth group")


    End Select