Visual Basic "between"?

Van néhány if utasításom, mindegyik egy számolt értékre ad egy másik értéket. Az a baj, hogy a "legfölső" felülírja az alatta lévőt. Tudnátok segíteni? (Ha valami ordas hibát vétettem, akkor ne szóljatok le, mert még tanulom a nyelvet)

If eredmeny.Text < 16 Then Label3.Text() = "valami"

If eredmeny.Text < 18.5 Then Label3.Text() = "valami2"

If eredmeny.Text < 25 Then Label3.Text() = "valami3"

If eredmeny.Text < 30 Then Label3.Text() = "valami4"

If eredmeny.Text < 35 Then Label3.Text() = "valami5"

If eredmeny.Text < 40 Then Label3.Text() = "valami6"

If eredmeny.Text > 40.1 Then Label3.Text() = "valami7"

szóval azt szeretném, hogyha 16 és 18.5 között van az érték, akkor a valami2 jelenjen meg (most a valami6 jelenik meg)