Select non funzionante

[kalosjo]

  Select Case peso
  Case Is <= 5
  spese = "8,80"
  Case Is <= 10
  spese = "10,00"
  Case Is <= 20
  spese = "10,90"
  Case Is <= 30
  spese = "14,2"
  Case Is <= 40
  spese = "17,7"
  Case Is <= 50
  spese = "21,1"
  Case Is <= 75
  spese = "27,9"
  Case Is <= 100
  spese = "37,5"
  Case Is > 100
  spese = "45,0"
  End Select

L'errore concettuale che hai fatto è quello di mettere la variabile peso nelle varie case.

In questo modo confronti il valore di peso con il valore dell'espressione (che è un booleano).

Per il funzionamento della select case (esce non appena trova il case giusto) basta mettere in successione i valori che non deve superare. Appena trova quello giusto, esce.