Android Question End If error

Sub btnCalcBMI_Click
    edtDisBMI.Text = ( edtb1.Text / (edtb2.Text * edtb2.Text))
    If (edtb1.Text == "" Or edtb2.Text == "") Then
        edtDisBMI.Text = "Enter the Values for Weight/Length"
    Else


        If edtDisBMI.Text <= 119 Then
            edtDisplayBMI.Text = "Normal" & edtDisBMI.Text

            If edtDisBMI.Text >=120 And edtDisBMI.Text <=139 Then
                edtDisBMI.Text = "Prehypertension" & edtDisBMI.Text
                If edtDisBMI.Text >=140 And edtDisBMI.Text <=159 Then
                    edtDisBMI.Text = "High Blood Pressure (Hypertension Stage 1)"& edtDisBMI.Text
                    If edtDisBMI.Text >=160 And edtDisBMI.Text <=179 Then
                        edtDisBMI.Text = "High Blood Pressure (Hypertension Stage 2)"& edtDisBMI.Text
                        If edtDisBMI.Text >= 180 Then
                            edtDisBMI.Text ="Hypertensive Crisis (EMERGENCY CARE NEEDED)"& edtDisBMI.Text

                        End If
End Sub

Case 120 to 139

Case 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139

Sub btnCalcBMI_Click

    If IsNumber(edtb1.Text) = False Then    'check user typed number
        edtDisBMI.Text = "Please enter valid Weight"
        Return    'no point in going any further, so abandon ship (ie exit this sub)
    Else If IsNumber(edtb2.Text) = False Then    'check user typed number
        edtDisBMI.Text = "Please enter valid Length"
        Return    'abandon ship
    End If
 
    Dim Weight As Float = edtb1.Text    'because weight not just whole numbers eg could be 63.5 kg
    Dim Length As Float = edtb2.Text
 
    If Length < 1 Then    'to prevent divide-by-zero in BMI calculation
        edtDisBMI.Text = "Length seems very short ? "
        Return    'abandon ship
    End If
 
    Dim BMI As Float = Weight / (Length * Length)
 
    edtDisBMI.Text = "The answer is " & BMI    'get the basics going first, worry about fancier words later

    BMI = Round(BMI)    'round to nearest whole number eg 119.7 becomes 120

    Dim BMIWords As String    'Dim once here, rather than many times below
 
    If BMI <= 119 Then    'is there such a thing as too low?  eg BMI = 10, is that good or bad?
        BMIWords = "Normal"
    Else If BMI <= 139 Then
        BMIWords = "Prehypertension"
    Else If BMI <= 159 Then
        BMIWords = "High Blood Pressure (Hypertension Stage 1)"    'Blood Pressure?  Isn't that different to BMI??
    Else If BMI <= 179 Then
        BMIWords = "High Blood Pressure (Hypertension Stage 2)"
    Else 'if we get to here then BMI must be > 179
        BMIWords = "Hypertensive Crisis (EMERGENCY CARE NEEDED)"
    End If
 
    edtDisBMI.Text = BMIWords & " " & Round(BMI)    'BMI already a whole number, but doing it again is cheap insurance