Hejsan alla!

Jag har ett problem, jag får inte en If-sats att fungera. Någon som kan se var felet är? Koden ser ut som den här nedanför.....


Private Sub SkrivUtDataOver35(intBmi)

If intBmi < 19 Then
lblUtskrift.Caption = "Ditt BMI-värde är: " & intBmi
lblForklaring.Caption = "Med ditt värde anses du vara underviktig."

Else If intBmi >= 19 And intBmi <= 24 Then
lblUtskrift.Caption = "Bitt BMI-värde är: " & intBmi
lblForklaring.Caption = "Med ditt värde anses du ha idealvikt."

Else If intBmi >= 25 And intBmi <= 26 Then

End If