从互联网加载图片到PictureBox1

 

         Dim  wr  As  Net.WebRequest  =  Net.WebRequest.Create(TextBox1.Text)
        
Dim  res  As  Net.WebResponse  =  wr.GetResponse
        
Dim  bmp  As   New  Bitmap(res.GetResponseStream)
        PictureBox1.Image 
=  bmp

你可能感兴趣的:(互联网)