Ausgeben zufälliger Variablen Paare

HotKeySet ( "{ESC}", "End" )

#include <GUIConstants.au3>
#include <GUIConstantsEx.au3>
Opt( "GUIOnEventMode", 1 )

$Fenster = GUICreate ( "Koordinaten", 200, 200 )
GUICtrlCreateLabel ( "Bitte geben sie 3 Zahlenpaare ein.", 25, 15 )
$Feld1 = GUICtrlCreateInput ( "", 65, 55, 30 )
$Feld2 = GUICtrlCreateInput ( "", 100, 55 )
$Feld3 = GUICtrlCreateInput ( "", 65, 80, 30 )
$Feld4 = GUICtrlCreateInput ( "", 100, 80 )
$Feld5 = GUICtrlCreateInput ( "", 65, 105, 30 )
$Feld6 = GUICtrlCreateInput ( "", 100, 105 )

$okbutton = GUICtrlCreateButton ( "OK", 70, 160, 60 )
GUICtrlSetOnEvent($okbutton, "OKButton")

GUISetState ( @SW_Show )

While 1
Sleep(1000)
WEnd

Func OKButton()
$1 = GUICtrlRead ( $Feld1 )
$2 = GUICtrlRead ( $Feld2 )
$3 = GUICtrlRead ( $Feld3 )
$4 = GUICtrlRead ( $Feld4 )
$5 = GUICtrlRead ( $Feld5 )
$6 = GUICtrlRead ( $Feld6 )
GUIDelete ( $Fenster )
$iWahl = Random(1,3,1)
Switch $iWahl
case 1
$sErg =$1 & " | " & $2
case 2
$sErg =$3 & " | " & $4
case 3
$sErg =$5 & " | " & $6
EndSwitch
MsgBox ( 1, "" , "Eines ihrer Zahlenpaare ist: " & $sErg)
EndFunc

Func End()
Exit
EndFunc