Dim verb As New WebClient
    Dim data As Stream
    Dim requ As HttpWebRequest
    Dim resp As HttpWebResponse
    Dim res As String
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles Button1.Click
 
        requ = System.Net.HttpWebRequest.Create("IP-Adresse")
        requ.Proxy.Credentials = New NetworkCredential      
        Benutzer", "Password", "Domäne")
 
        resp = requ.GetResponse()
 
        Dim sr As StreamReader = New StreamReader(resp.GetResponseStream)
        res = sr.ReadToEnd.ToString
       label.Text = res
 
        sr.Close()
 
    End Sub