WebBrowser1.ScriptErrorsSuppressed = True
        Dim rnd As New Random(Date.Now.Millisecond)
        Dim proxies() As String = {"68.83.79.35:3128", "63.223.114.7:80", _
          "41.234.206.167:80"}
        Dim url As String = "http://www.wieistmeineip.de"
        Using wc As New Net.WebClient
            Dim proxy As String = proxies(rnd.Next(0, proxies.Length - 1))
            Debug.WriteLine(proxy)
            wc.Proxy = New Net.WebProxy(proxy)
            WebBrowser1.DocumentText = wc.DownloadString(url)
        End Using