Простейшая форма

Case $Button
	if GUICtrlRead($Input) <> "" Then Func()

$Input = GUICtrlCreateInput(" "& @CRLF, 190,332,150,25,$ES_MULTILINE)
$Button = GUICtrlCreateButton("OK", 342,332,24,24,$BS_DEFPUSHBUTTON)
While 1
Select
	Case $Button
    if GUICtrlRead($Input) = "01234" Then Exit
	EndSelect
WEnd

;...
While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $Button
			If GUICtrlRead($Input) = "01234" Then Exit
	EndSwitch
WEnd

$Input  = GUICtrlCreateInput(" "& @CRLF, 190,332,150,25,$ES_MULTILINE)
$Button = GUICtrlCreateButton("OK", 342,332,24,24,$BS_DEFPUSHBUTTON)
While 1
    $msg = GUIGetmsg()
    Select
        Case $msg = $Button
        if GUICtrlRead($Input) = "01234" Then Exit
    EndSelect
WEnd

While 1
Select
Case $Button	; Если Select находит среди Case выражение  равное значению $Button 
				; (а оно равно уже 3! строка ниже вам это покажет) то вслед за Case 
				; будет выполнено условие! А именно $Input = "01234"! Вот тут, подвох!
				; НЕ ЛЕНИМСЯ ЧИТАТЬ, ВСЁ ЭТО НАПИСАНО В СПРАВКЕ!!! :)  НЕ СПЕШИМ ДЕЛАТЬ ВЫВОДЫ!
	ConsoleWrite($Button &@CRLF)
    if GUICtrlRead($Input) = "01234" Then Exit
    EndSelect
WEnd