Discussione: [VB.NET] Costrutto Select Case con valori di tipi eterogenei

Navigazione veloce Visual Basic e .Net Framework Vai in cima

Hybrid View

22-03-2007, 20:11 #1

mardok30

Utente di HTML.it

codice:

Select Case CInt(txtcomposizione.Text)
            Case Is < 16
                lblRisultatoComposizione.Text = "Sottopeso grave"
            Case 16 To 16.99
                lblRisultatoComposizione.Text = "Sottopeso normale"
            Case 17 To 18.49
                lblRisultatoComposizione.Text = "Sottopeso lieve"
            Case 18.5 To 24.99
                lblRisultatoComposizione.Text = "Normopeso"
            Case 25 To 29.99
                lblRisultatoComposizione.Text = "Sovrappeso"
            Case 30 To 34.99
                lblRisultatoComposizione.Text = "Obesità lieve"
            Case 35 To 39.99
                lblRisultatoComposizione.Text = "Obesità media"
            Case Is >= 40
                lblRisultatoComposizione.Text = "Obesità grave"
        End Select