[Mathman]

Hallo, ich sollte für ne Freundin nen Quelltext verfassen, jedoch bin ich tod müde vom lernen und finde leider den fehler im syntax nicht...

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

mfg
mathman

Dieser Beitrag wurde von Mathman bearbeitet: 06. April 2005 - 20:27