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
posted on 2006-04-11 16:17  dahai.net  阅读(819)  评论(0编辑  收藏  举报