vb 选项卡操作

来源:百度知道 编辑:UC知道 时间:2024/06/17 15:38:23
请教一下VB关于选项卡的操作。
我想实现通过选项卡+WebBrowser控件,实现多网页浏览
1、怎么样在程序运行时添加、删除选项卡
2、新添加的选项卡怎么样增加新的控件(控件和布局和初始选项卡一样)
3、每个选项卡里的控件与变量是独立还是公用的,如何区分(局部变量和全局变量)

我试了一下,可能是我的机子有问题。

StripTab 居然不能添加控件了

你看看这样行不?

Dim oTab As MSComctlLib.Tab
Dim oWebBrowser As SHDocVwCtl.WebBrowser
'1、怎么样在程序运行时添加、删除选项卡

Set oTab = Me.TabStrip1.Tabs.Add() '加选项卡
'2、新添加的选项卡怎么样增加新的控件(控件和布局和初始选项卡一样)
Set oWebBrowser = Me.Controls.Add("SHDocVwCtl.WebBrowser", "webbrowser2", oTab)'加WebBrowser

可以动态加载控件的,给你写了个Picture的小例子。。你看看
Private Sub Command2_Click()
Dim i As Long

For i = 1 To 10
Dim oPic As PictureBox
Set oPic = Me.Controls.Add("vb.picturebox", "pic" & i, Me)
With oPic
.Height = 500
.Top = 100 + .Height * i
.Left = 100
.Width = 500
.Visible = True
.Picture = LoadPicture("C:\61.jpg")'图片文件
End With
Next
End Sub

3.每个选项卡里的控件与变量是独立还是公用的,如何区分(局部变量和全局变量)

都是公用的,就像放在Form里一样

可以考虑用控件数组来操作。。。