NoTrayIcon

#include <GUIConstants.au3>

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

Global $MyPing = 0
Global $i = 0
#region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Ping Checker", 187, 104, 193, 125)
$Label1 = GUICtrlCreateLabel($MyPing, 0, 0, 180, 97)
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch
    Switch $i
        Case 500
            Sleep(2000)
            _Ping()
            GUICtrlSetData($Label1, $MyPing)
            $i = 0
        Case Else
            $i = $i + 1
    EndSwitch

WEnd


Func _Ping()
    Global $MyPing = Ping("www.google.de")
EndFunc   ;==>_Ping

Func _Exit()
    Exit
EndFunc   ;==>_Exit