如何创建一个通用的 MS Access 表单？

Posted 2023-03-21

【中文标题】如何创建一个通用的 MS Access 表单？

【英文标题】：How to create a universal MS Access form?

【发布时间】：2013-05-29 22:57:43

【问题描述】：

我有一个数据库，其中有两个表，它们仅在几个字段中有所不同，所以我想为它们创建一个表单并添加一个选项组（无线电开关），女巫将确定字段中的数据应该放到哪个表中。我不知道如何挂起目的地和一些字段应该被隐藏或至少在一个而不是另一个选项上。

这给了我一个想法，对于小型数据库，这可以用来创建通用表单。

如何根据选项组从 MS Access 中的表单字段控制数据目的地？

【参考方案1】：

您可以根据在空白表单中创建的变量调用不同的表。这是一个示例，如果您在组合框中使用表名。

Dim var as String
Dim myR as Recordset

var = me.combo_box_name.column(0)

Set myR = CurrentDb.OpenRecordset (var, dbOpenDynaset)

'Code here based on variable, use an if statement if you want

Set myR = Nothing