有没有办法动态创建Access表单?

时间:2011-09-08 15:55:19

标签: ms-access ms-access-2007 access-vba

问题:我有几个视图(使用SQL Server访问ADP)。我想为这些视图创建一个基本的连续表单,每个视图一个表单。这些视图包含完全不同的列名称取决于它们所在的模块。

假设一个视图可能与10列的学生成绩有关。其他可能是关于过去的学生技能20列。但是,这些表单有一个共同点是StudentID列,允许用户双击。通过这样做,它会调用学生表格。

现在,我反复为每个视图手动创建这些连续表单。我在想,如果我能动态创建它应该是好的。例如,如果我们更改或添加新视图。我没有必要为这些表单更改列,因为它每次调用时都会生成。

我不确定在Access ADP中是否可以这样做。

1 个答案:

答案 0 :(得分:0)

您似乎在寻找Application.CreateForm Method (Access)

引用:

此示例基于Customers表单在Northwind示例数据库中创建一个新表单,并将其RecordSource属性设置为Customers表。从Northwind示例数据库运行此代码。

Sub NewForm()
    Dim frm As Form

    ' Create form based on Customers form.
    Set frm = CreateForm( , "Customers")
    DoCmd.Restore
    ' Set RecordSource property to Customers table.
    frm.RecordSource = "Customers"
End Sub