Guten Abend,
beschäftige mich seit etwa 3 Tagen mit AutoIt und dem ganzen Programmieren. Habe einen kleinen Body Mass Index programmiert. Ist nichts grosses, hat aber mit meinen Kenntnissen schon ne Zeit lang gedauert^^
(Daten sind aus Wikipedia)
Spoiler anzeigen
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Body Mass Index", 300, 171, 192, 124)
$Input1 = GUICtrlCreateInput("Körpergewicht (kg)", 32, 32, 145, 21)
$Input2 = GUICtrlCreateInput("Körpergrösse (m)", 32, 72, 145, 21)
$Button1 = GUICtrlCreateButton("Ausrechnen", 32, 112, 65, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Beenden", 112, 112, 65, 25, $WS_GROUP)
$Label1 = GUICtrlCreateLabel("",200,32,100,100)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button2
Exit
Case $Button1
$Antwort = (GUICtrlRead ($Input1) / (GUICtrlRead ($Input2) * GUICtrlRead($Input2)))
If $Antwort < 16 Then
GUICtrlSetData($Label1, "Sie haben starkes Untergewicht!")
ElseIf $Antwort > 16 And $Antwort < 17 Then
GUICtrlSetData($Label1, "Sie haben mässiges Untergewicht!")
ElseIf $Antwort > 17 And $Antwort < 18.5 Then
GUICtrlSetData($Label1, "Sie haben leichtes Untergewicht!")
Elseif $Antwort > 18.5 And $Antwort < 25 Then
GUICtrlSetData($Label1, "Sie haben Normalgewicht!")
ElseIf $Antwort > 25 And $Antwort < 30 Then
GUICtrlSetData($Label1, "Sie haben leichtes Übergewicht!")
Elseif $Antwort > 30 And $Antwort < 35 Then
GUICtrlSetData($Label1, "Sie haben mässiges Übergewicht!")
Elseif $Antwort > 40 Then
GUICtrlSetData($Label1, "Sie haben starkes Übergewicht!")
EndIf
EndSwitch
WEnd
Freue mich über jeden Kommentar