vb下载图片vb下载图片vb下载图片

Public 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 URLDownloadToFile 0, URL, tempfile, 0, 0 Picture1.Picture = LoadPicture(tempfile)