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）实例化一个控件；

（2）设置控件实例属性；

（3）将控件实例添加到窗体的Controls集合中

【示例】用代码向窗体添加一个命令按钮，单击这个按钮关闭窗口并退出

（1）在Visual Studio中新建一个“Windos 窗体应用程序”

（2）窗体代码Form1.cs如下：

using System

using System.Collections.Generic

using System.Windows.Forms

using System.Drawing

namespace WindowsFormsApplication1

{

    public partial class Form1 : Form

    {

        public Form1()

        {

            InitializeComponent()

            

            //实例化一个命令按钮

            Button btn = new Button()

            

            //设置命令按钮的属性 

            btn.Location = new Point(50, 50)

            btn.Size = new Size(80, 25)

            btn.Text = "退出"

            btn.Click += btn_Click

            

            //添加到窗口的Controls集合中

            this.Controls.Add(btn)

        }

        void btn_Click(object sender, EventArgs e)

        {

            this.Close()

        }

    }

}

（3）运行效果

窗体启动后

点击“退出”按钮后，窗口关闭。

主要有两种方法：

第一种，是最常用的，也是使Vb变得简单的一个优势，就是直接从工具箱中zhidao选择空间，添加到窗体中，还可以选中控件，设置各种专属性，设置好后，就无需再用代码进行设置。

第二种，比较复杂，就是直接用代码添加控件。需要用代码指定控件的大小属、位置等等各种属性，一般在Vb中用的较少。

---