Foros del web, para los que viven de bits

 Public Function LoadWebImageToPictureBox(ByVal pb _
   As PictureBox, ByVal ImageURL As String) As Boolean

        Dim objImage As MemoryStream
        Dim objwebClient As WebClient
        Dim sURL As String = Trim(ImageURL)
        Dim bAns As Boolean

        Try
            If Not sURL.ToLower().StartsWith("http://") _
                 Then sURL = "http://" & sURL
            objwebClient = New WebClient


            objImage = New _
               MemoryStream(objwebClient.DownloadData(sURL))
            pb.Image = Image.FromStream(objImage)
            bAns = True
        Catch ex As Exception

            bAns = False
        End Try

        Return bAns

    End Function

Private Sub CargarBanner()

        Dim urlBanner As String = "http://maurishio.freefronthost.com/imagenes/logo.gif"

        Dim objRequest As System.Net.HttpWebRequest = CType(System.Net.WebRequest.Create(urlBanner), System.Net.HttpWebRequest)

        Dim ImagenBaner As New Bitmap(objRequest.GetResponse.GetResponseStream)
        Banner.Image = ImagenBaner

    End Sub