Visual Basic - CASE

Creo q antes no lo he explicado bien, mi lproblema es el siguiente. Tengo q hacer segun unos kg haya unas tarifas y me gustaría (si se puede), hacerlo con un CASE.
Con el if seria así

if kilos<=1 and kilos <=10 then

prueba con
case 1 to 10
....
case 11 to ...
end select
Fran

perdona, no tenia muy claro lo que querias.
la solucion sería
select case kilos
case <=10
.......
case<=20
.......
end select
cuando entre por un caso debe de salir del select case, por tanto no te debes preocupar de que pase por el siguiente.
Fran

GRACIAS ME HA FUNCIONADO