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

Local $hGUI = GUICreate("Example", 400, 400)

Local $test = GUICtrlCreateLabel("Проверка соединения состоялась", 10,10,200,250)
Local $idread = GUICtrlCreateButton("Проверка соединения к интернету", 100, 300, 185, 50)
GUISetState(@SW_SHOW, $hGUI)
While 1
Switch GUIGetMsg()
Case   $idread 
Local $text = GUICtrlRead($test) 
$ping = Ping("www.google.com")
 If $ping = 0 then
Local $time = @CRLF & @HOUR & ":" & @MIN & ":" & @SEC
GUICtrlSetData( $test,"Проверка соединения состоялась"&$time & @CRLF & " интернет не подключен" )
Else
Local $time = @CRLF & @HOUR & ":" & @MIN & ":" & @SEC
GUICtrlSetData( $test,"Проверка соединения состоялась" &$time & @CRLF & " интернет подключен")
Endif
Case $GUI_EVENT_CLOSE
ExitLoop

EndSwitch
WEnd