una forma puedes utilizar el control webbrowser del componente "microsoft internet controls"
y haces lo siguiente
Cita: Private Sub Form_Load()
HTML = "about
:" & _
"<html>" & _
"<body leftMargin=0 topMargin=0 marginheight=0 marginwidth=0 scroll=no>" & _
"<img src=http://www.wetterzentrale.de/pics/D2u.jpg width= 160 height= 160 ></img></body></html>"
WebBrowser1.Navigate HTML
End Sub
luego con para refescar haces lo siguiente
WebBrowser1.Refresh
fijate que si cambias los valores width= 160 y height= 160 puedes hacer mas grande o mas pequeña la imagen
bueno y otra forma es vajando la imagen en tu pc y luego mostrarla en un picture, pero esta ultima no se si se acutalia correctamente o bien la lee directamente del cache(o algo asi)
yo puse un image1 y un command1
Cita: Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
Public Function DownloadFile(URL As String, LocalFilename As String) As Boolean
Dim lngRetVal As Long
lngRetVal = URLDownloadToFile(0, URL, LocalFilename, 0, 0)
If lngRetVal = 0 Then DownloadFile = True
End Function
Private Sub Command1_Click()
DownloadFile "http://www.wetterzentrale.de/pics/D2u.jpg", App.Path + "\Imagen.jpg"
Image1 = LoadPicture(App.Path + "\imagen.jpg")
End Sub
Saludos