[Adrees]

السلام عليكم

اولا اكتب هذه الدالة 

PHP كود :

   Public Shared Function CheckInternetConnection() As Boolean
        Try
            Return My.Computer.Network.Ping("www.google.com")
            Return True
        Catch
            Return False
        End Try
    End Function 


ثانيا في الحدث Form Load  ضع الكود التالي

PHP كود :

       If CheckInternetConnection() = True Then
            MessageBox.Show("Your Computer is  Connected to internet", "Connected", MessageBoxButtons.OK, MessageBoxIcon.Information)
        Else
            MessageBox.Show("Your Computer is not Connected to internet", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
            Application.Exit()
        End If 


ان شاء الله يفيدك هذا الكود.