Public Function
webDownloadImage(ByVal Url As String, Optional ByVal saveFile As Boolean = False,
Optional ByVal location As String = "C:\") As Image
Dim webClient As New System.Net.WebClient
Dim bytes() As Byte = webClient.DownloadData(Url)
Dim stream As New IO.MemoryStream(bytes)
If saveFile Then My.Computer.FileSystem.WriteAllBytes(location, bytes, False)
Return New System.Drawing.Bitmap(stream)
End Function
sub Load()
PictureBox1.Image = webDownloadImage("http://www.somewebsite.com/image.jpg", True, "C:\temp.jpg")
end sub
http://www.vbforums.com/showthread.php?387841-Display-image-from-internet-in-a-Picturebox