Question

代替创建具有不同记录/控制源的3个单独的相同表单，如何创建一个使用相同表单但根据记录组合中的选择更改记录源（表）的组合框？

到目前为止，我在click事件（下面的se）上尝试了此操作，但是它只是打开了一个带有#Name的表单？插入文本字段中。

Private Sub cmbMain_Click()
' combobox main form

 Select Case cmbMain

    Case "A"

   DoCmd.OpenForm "FormX", , , OpenArgs:=Me.RecordSource = "tblA"


    Case "B"

    DoCmd.OpenForm "FormX", , , OpenArgs:=Me.RecordSource = "tblB"

Answer 1

这不是您使用OpenArgs参数的方式。 OpenArgs仅用于将字符串传递给表单。

相反，您可以使用Forms集合来设置记录源：

DoCmd.OpenForm "FormX"
Forms!FormX.Recordsource = "tblA"

访问VBA-用不同的记录源分隔相同的表格吗？

1 个答案: