VB添加控件到选项卡

Question

Controls.Add "VB.textbox", "txt1", Me
With Me!txt1
.Visible = True
.Width = 5175
.Height = 375
.Left = 240
.Top = 600
这是添加text控件的命令。
我要让他添加到选项卡tab1里面。怎么添加？

Answer 1

object.Add (ProgID, name, container)

参数说明

Object 必需的。一个对象表达式，其值是“应用于”列表中的一个对象。

ProgID 必需的。一个标识控件的字符串。大多数控件的 ProgID 都可通过查看对象浏览器来决定。控件的 ProgID 是由控件的库和类组成的。

例如，CommandButton 控件的 ProgID 是 VB.CommandButton。在ProgID 与对象浏览器中所显示的不一样的情况下，Visual Basic

将显示一个包括正确 ProgId 的错误信息。

name 必要的。一个字符串，用来标识集合的成员。

container 可选的。一个对象引用，它指定控件的容器。如果没有指定或为NULL，缺省值为 Controls 集合所属的容器。通过指定该参数，可以把一个控件放置在任何现存的容器控件（如 Frame 控件）中。用户控件或 ActiveX 文档也可以作为一个容器。

Private Sub Form_Load()
Form1.Controls.Add "VB.CommandButton", "cmdOk", tab1 <-----这里
With Form1!cmdOk
.Visible = True
.Width = 500
.Caption = "确认(&Y)"
End With
End Sub

Answer 2

如果不需要动态建控制的话。

======================================================================
首先：右键单击控件工具栏驱，在弹出的菜单中选“部件”。
然后：在弹出的“部件”对话框中，选“Microsoft Tabbed Dialog Control 6.0 (SP6)”。
======================================================================
之后，控件工具栏中就有那个“选项卡”控件了。

使用很简单：直接在VB中点需要放控件的选项卡。然后，直接把控件放进去就好了。

Easy 吧？

要是需要动态加控件的话，小弟我就不知道了。