Comprobar conexión a internet desde VS

Para conocer si hay conexión a Internet en caso tengamos un WebBrowser en la aplicación, para VB.NET se puede hacer esto:

ImportsSystem.Net

PublicClass Form1

    Private Sub Form1_Load(ByValsender As System.Object, ByVal e AsSystem.EventArgs) HandlesMyBase.Load

        compruebaConexion()

    End Sub

    Public Function compruebaConexion() AsBoolean

        Dimrequest As WebRequest

        Dimresponse As WebResponse

        Dim Url As New Uri("http://www.pabletoreto.blogspot.com")

      

        Try

            'Creamos la request

            request = System.Net.WebRequest.Create(Url)

            'POnemos un tiempo limite

            request.Timeout = 5000

            'ejecutamos la request

            response = request.GetResponse

            response.Close()

            request = Nothing

            Label2.Text = System.Environment.MachineName & "si hay conexion a internet"

            ReturnTrue

        Catchex As Exception

            'si ocurre un error, devolvemos error

            request = Nothing

            Label2.Text = "No hay conexion a internet"

            ReturnFalse

        End Try

    End Function

 EndClass

Para conocer si hay conexión a Internet en caso tengamos un WebBrowser en la aplicación, para C# se puede hacer esto:

usingSystem;

usingSystem.Collections.Generic;

usingSystem.ComponentModel;

usingSystem.Data;

usingSystem.Drawing;

usingSystem.Linq;

usingSystem.Text;

usingSystem.Windows.Forms;

usingSystem.Net;

namespaceWindowsFormsApplication1

{

    public partial class Form2 : Form

    {

        publicForm2()

        {

            InitializeComponent();

        }

        privatevoid Form2_Load(objectsender, EventArgs e)

        {

            compruebaConexion();

        }

        public bool compruebaConexion()

        {

            WebRequestrequest = null;

            WebResponseresponse = null;

            UriUrl = new Uri("http://www.pabletoreto.blogspot.com");

            try

            {

                //Creamos la request

                request = System.Net.WebRequest.Create(Url);

                //POnemos un tiempo limite

                request.Timeout = 5000;

                //ejecutamos la request

                response = request.GetResponse();

                response.Close();

                request = null;

                label1.Text = System.Environment.MachineName + "si hay conexion a internet";

                returntrue;

            }

            catch (Exceptionex)

            {

                //si ocurre un error, devolvemos error

                request = null;

                label1.Text = "No hay conexion a internet";

                returnfalse;

            }

        }

   

    }

}