PictureBox + Imagen de internet

[alehawk]

Pone esto en un modulo:

Código:

 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

Y para cargar la foto:
LoadWebImageToPictureBox(Me.PictureBox1, "http://www.miurl.com/miimagen.gif")