Könnt ihr mir bitte den fehler sagen, ich such leider mir hier schon einen wolf...
der fehler müsste mit der if zusammenstellung zusammen hängen...
Zitat
//Variabelen deklarieren
dim groesse, alter, masse as double
dim bmi as integer
dim ausgabe as string
//Auslesen Eingabefelder
//val: Funkrion wandelt Teyttyp in Zahltyp um
masse=val(editField1.text)
groesse=val(editField2.text)
alter=val(editField3.text)
//Berechnen des BMI
bmi=masse / (groesse*groesse)
if alter > 64 then
if bmi < 30 and bmi > 23 then
staticText_ausgabe.text="Sie haben einen wünschenswerter BMI, er beträgt " + str(bmi)
else
staticText_ausgabe.text="Sie haben einen falschen BMI, er beträgt " + str(bmi)
end if
else
if alter > 54 then
if bmi <29 and >22 then
staticText_ausgabe.text="Sie haben einen wünschenswerter BMI, er beträgt " + str(bmi)
else
staticText_ausgabe.text="Sie haben einen falschen BMI, er beträgt " + str(bmi)
end if
if alter > 44 then
if bmi <28 and >21 then
staticText_ausgabe.text="Sie haben einen wünschenswerter BMI, er beträgt " + str(bmi)
else
staticText_ausgabe.text="Sie haben einen falschen BMI, er beträgt " + str(bmi)
end if
if alter > 34 then
if bmi <27 and >20 then
staticText_ausgabe.text="Sie haben einen wünschenswerter BMI, er beträgt " + str(bmi)
else
staticText_ausgabe.text="Sie haben einen falschen BMI, er beträgt " + str(bmi)
end if
if alter > 24 then
if bmi <26 and >19 then
staticText_ausgabe.text="Sie haben einen wünschenswerter BMI, er beträgt " + str(bmi)
else
staticText_ausgabe.text="Sie haben einen falschen BMI, er beträgt " + str(bmi)
end if
else
if bmi <25 and >18 then
staticText_ausgabe.text="Sie haben einen wünschenswerter BMI, er beträgt " + str(bmi)
else
staticText_ausgabe.text="Sie haben einen falschen BMI, er beträgt " + str(bmi)
end if
end if
end if
end if
end if
end if
end if
dim groesse, alter, masse as double
dim bmi as integer
dim ausgabe as string
//Auslesen Eingabefelder
//val: Funkrion wandelt Teyttyp in Zahltyp um
masse=val(editField1.text)
groesse=val(editField2.text)
alter=val(editField3.text)
//Berechnen des BMI
bmi=masse / (groesse*groesse)
if alter > 64 then
if bmi < 30 and bmi > 23 then
staticText_ausgabe.text="Sie haben einen wünschenswerter BMI, er beträgt " + str(bmi)
else
staticText_ausgabe.text="Sie haben einen falschen BMI, er beträgt " + str(bmi)
end if
else
if alter > 54 then
if bmi <29 and >22 then
staticText_ausgabe.text="Sie haben einen wünschenswerter BMI, er beträgt " + str(bmi)
else
staticText_ausgabe.text="Sie haben einen falschen BMI, er beträgt " + str(bmi)
end if
if alter > 44 then
if bmi <28 and >21 then
staticText_ausgabe.text="Sie haben einen wünschenswerter BMI, er beträgt " + str(bmi)
else
staticText_ausgabe.text="Sie haben einen falschen BMI, er beträgt " + str(bmi)
end if
if alter > 34 then
if bmi <27 and >20 then
staticText_ausgabe.text="Sie haben einen wünschenswerter BMI, er beträgt " + str(bmi)
else
staticText_ausgabe.text="Sie haben einen falschen BMI, er beträgt " + str(bmi)
end if
if alter > 24 then
if bmi <26 and >19 then
staticText_ausgabe.text="Sie haben einen wünschenswerter BMI, er beträgt " + str(bmi)
else
staticText_ausgabe.text="Sie haben einen falschen BMI, er beträgt " + str(bmi)
end if
else
if bmi <25 and >18 then
staticText_ausgabe.text="Sie haben einen wünschenswerter BMI, er beträgt " + str(bmi)
else
staticText_ausgabe.text="Sie haben einen falschen BMI, er beträgt " + str(bmi)
end if
end if
end if
end if
end if
end if
end if
mfg
mathman
Dieser Beitrag wurde von Mathman bearbeitet: 06. April 2005 - 20:27