访问动态表单

Question

我有一个“alpha”形式，我正在尝试动态更改它。我目前的代码非常简单：

Dim frm as Form
Dim strName as string

StrName="alpha"

Set frm = CreateForm(strName)

然后能够动态地在表单上

Createcontrol()

.. 但我似乎误解了该函数

CreateForm()

，因为它给了我一个关于找不到数据库“alpha”的错误7870。

Answer 1

它在文档中。
https://learn.microsoft.com/en-us/office/vba/api/access.application.createform

CreateForm

的第一个参数是

Database

- 仅使用它在不同的数据库中创建表单。

设置名称：

Set frm = CreateForm()
frm.Name = strName