[dubai.eig]

السلام عليكم  ورحمة الله

اواجه مشكله في حالت تعطل النت البررنامج عندي يعلق كثير

وتطلع لي رساله

إقتباس :Exception thrown: 'System.Net.NetworkInformation.PingException' in System.dll

لان عندي في البررنامج كم كود يشتغلون مع النت

وانا حاط هذا الكود في Module1.vb

كود :

   Public Function CheckInternetConnection() As Boolean

       Dim objPing As New System.Net.NetworkInformation.Ping

       Try
           Return If(objPing.Send("www.google.com").Status = Net.NetworkInformation.IPStatus.Success, True, False)
       Catch
           Return False
       End Try

   End Function

فكرة اعمل 
رBackgroundWorker
بس ما اعررف هل يضبط في Module1
المشكله يعلق كثير البرنامج
هل من حل
بارك الله فيكم