VB6.0如何用代码添加控件？

使用数组方式，前提是已经初始化一个控件\x0d\x0a示例：\x0d\x0a存在一个text1(0)控件\x0d\x0aPrivate Sub Command1_Click()\x0d\x0aLoad Text1(1)\x0d\x0aText1(1).Top = Text1(0).Top + 500\x0d\x0aText1(1).Visible = True\x0d\x0aLoad Text1(2)\x0d\x0aText1(2).Top = Text1(1).Top + 500\x0d\x0aText1(2).Visible = True\x0d\x0aEnd Sub

1）运行VB6.0，新建一个标准EXE工程，将鼠标移到下图左侧工具箱的A按钮处。

2）双击该按钮，窗体上就会出现一个Label控件。

3）可对它进行属性设置，并移动到窗体需要的位置。接着可继续按前方法添加Label控件。

4）Label 控件， Label 控件是图形控件，可以显示用户不能直接改变的文本。

VB6.0ActiveX 控件是：

1）通过工程-部件。

2）在部件对话框勾选所需要的控件-确定，就可将所需ActiveX 控件添加到工具箱。

3）双击工具箱所需控件，添加到窗体，然后双击窗体上的该控件，编写该该控件的应用程序代码。

---