Dim req As HttpWebRequest = CType(WebRequest.Create(URL), HttpWebRequest)
        Dim res As HttpWebResponse = CType(req.GetResponse, HttpWebResponse)
        Dim str As New StreamReader(res.GetResponseStream)

Private Function GetSourcecode(ByVal URL As String) As String
        Application.DoEvents()
        Dim req As HttpWebRequest = CType(WebRequest.Create(URL), _
          HttpWebRequest)
        Dim res As HttpWebResponse = CType(req.GetResponse, HttpWebResponse)
        Dim str As New StreamReader(res.GetResponseStream, _
          System.Text.Encoding.Default)
 
        str = System.Text.Encoding.Convert(System.Text.Encoding.Default, _
          System.Text.Encoding.UTF8, str)
 
        Return str.ReadToEnd
    End Function

Zitat:

Der Wert vom Typ "System.IO.StreamReader" kann nicht in "1-dimensionales Array von Byte" konvertiert werden.

---
Woher soll ich wissen, was ich denke, bevor ich h?re, was ich sage?