我刚下了个VB 想学一下

现在用到
要在VB的的一个框子里显示网页的内容

谁能告诉我以下 在VB中显示网页内容的代码是什么

比如说 网页的地址是 http://www.jymetin.com/gonggao.htm

请会的帮忙发一下代码！谢谢了！

Option Explicit
Private Sub Command1_Click() 'connect the required website
Dim b() As Byte
Inet1.Cancel
Inet1.Protocol = icHTTP
Inet1.URL = Text1.Text 'input the website
b() = Inet1.OpenURL(, icByteArray)
Open "文件存放位置如:c:\1.txt" For Binary Access Write As #1
Put #1, , b()
Close #1
End Sub

I am sorry for omitting the component.
The componet I added is "Microsoft Internet Transfer Control 6.0".