vb 如何在代码中实现添加控件

新建一个项目

在窗体上添加一个command1, 再添加一个command2, 将command2的index属性改为0.

Dim i As Long

Private Sub Command1_Click()

Load Command2(i)

With Command2(i)

.Left = Command2(0).Left

.Top = Command2(i - 1).Top + Command2(0).Height + 100

.Width = Command2(0).Width

.Height = Command2(0).Height

.Visible = True

.Caption = "Command" &i

End With

i = i + 1

End Sub

Private Sub Form_Load()

i = 1

End Sub

1. 安装vs2008。注意:不是Express版本.

2. 安装Qt for windows。 注意Qt的安装路径最好安装在全英文路径而且中间没有空格。

3. 安装Qt SDK for wince，(过程比较长)

打开visual studio 2008命令提示,然后顺序执行以下命令：

a. VS2008命令提示(DOS),进入QTCE文件夹执行, 输入命令: configure -platform win32-msvc2008 -xplatform wincewm60professional-MSVC2008 -webkit –fast

b.设置VC的CE INCLUDE和LIB目录c. 输入命令 nmake 执行

c.输入命令 nmake 执行

4. 安装Qt的VS开发插件(qt-vs-addin)

5. 配置VS2008的Qt开发环境（VS2008最好是英文版本）进入VS2008，选择Qt菜单，Qt Option,进行设置。

---