access 在窗体上动态添加控件

Dim ctl As Control

rem 定义一个控件类型变量

DoCmd.OpenForm "窗体12", acDesign, , , , acHidden

rem 在设计视图以隐藏状态打开窗体12

Set ctl = CreateControl("窗体12", acComboBox, acDetail, , , 10, 50, 3000, 440)

创建控件ctl在窗体12中，类型为组合框，后面为具体选项

DoCmd.OpenForm "窗体12"

执行显示窗体。

首先打开access，新建一个窗体，点击上面菜单栏的“创建”，点击“窗体”。

然后点击窗口布局工具下的“设计”，再点击设计下一栏的“选项卡控件”。

接着移动鼠标到工作区，单击左键即可添加好选项卡控件，可以在右侧的属性表中将内容类型更改成不同的选项卡控件，对其进行属性编辑。

选择创建对象之后

，在工具栏里有一个工具箱按钮

你点击之后会d出工具箱，然后你点击工具箱里面的标签

在窗体上画一个就可以了

不会可以9560-38468远程给你解决

---