如何用vb做多标签浏览器

建一个只有一个选项卡的控件，在选项卡内放置一个web控件，将web控件的index设为0，以下为新增一页的代码
Private Sub Command1_Click()
'增加一个选项卡
SSTab1.Tabs = SSTab1.Tabs + 1
SSTab1.TabsPerRow = SSTab1.TabsPerRow + 1
SSTab1.TabCaption(SSTab1.Tabs - 1) = "新建窗口..."
SSTab1.Tab=SSTab1.Tabs - 1
'加载新的Web控件并放在新的选项卡上
Load Web1(Web1.UBound+1)
Set Web1(Web1.UBound).Container=SSTab1
Web1(Web1.UBound).Visible=True
Web1(Web1.UBound).Left=0
Web1(Web1.UBound).Top=0
End Sub
上例只是简单地讲述如何新增页，至于要关闭页就要对Web控件数组进行一系列重排了
可以根据关闭的SSTab选项卡的值来对WEB数组重排，自己好好想一下，Unload Web1(1)
可以卸载该控件。

个人看法:
建立TAB控件,然后放几个WEB控件!呵呵

简单的没有

复杂的只有2中方案

你这要求无解