$Form1 = GUICreate("Form1", 396, 137, 462, 154)
$Input1 = GUICtrlCreateInput("", 40, 24, 233, 21)
$Button1 = GUICtrlCreateButton("Button1", 232, 80, 75, 25)
GUISetState()
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case -3
Exit
Case $Button1
$read = GUICtrlRead($Input1)
If Not $read = '' Then
ConsoleWrite($read & @CRLF)
EndIf
EndSwitch
WEnd