#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>


Dim $aItems[4] = ["", "Hi", "Wie gehts?", "Tschüss"]

GUICreate("", -1, -1, -1, -1, $WS_SIZEBOX)

$input = GUICtrlCreateInput("0", 10, 10, 50, 20)
$updown = GUICtrlCreateUpdown($input)
GUICtrlSetLimit($updown, 3, 1)
GUICtrlSetPos($input, 10, 10, 100, 40)
GUISetState()

While 1
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then ExitLoop

    $wert = GUICtrlRead($input)

    If $wert > 0 Then
        GUICtrlSetData($input, $aItems[$wert])
    EndIf
WEnd