Hallo
Ich würde es mit Arrays machen! Also ungefair so:
[autoit]Dim $zufallsfrage[6] ;wieviele fragen +1! also 5fragen +1 = $zufallsfrage[>>>6<<<]
[/autoit][autoit][/autoit][autoit]$zufallsfrage[1] = "Was ist die wurzel aus 9?"
$zufallsfrage[2] = "Wieviel sind 10+5?"
$zufallsfrage[3] = 'Wie definiert ihr perfektion und "einfachheit"?'
$zufallsfrage[4] = "Wieviel sind 5x5?"
$zufallsfrage[5] = "Was ist google?"
Dim $zufallsantwort[6]
[/autoit][autoit][/autoit][autoit]$zufallsantwort[1] = "3"
$zufallsantwort[2] = "15"
$zufallsantwort[3] = "AutoIt"
$zufallsantwort[4] = "25"
$zufallsantwort[5] = "Eine übergroße weltherschende Suchmaschine"
$random = Random(1,5,1)
[/autoit][autoit][/autoit][autoit]$ib = InputBox("Deine antowort..",$zufallsfrage[$rand])
[/autoit][autoit][/autoit][autoit]If $ib = $zufallsantwort[$rand] Then
MsgBox(0,"","Richtig!")
Else
MsgBox(48,"","Falsch..")
EndIf
Mfg Spider