Question

Dim newRS
newRS = "SELECT DISTINCT [Grp_ID], [Group_Name], [Group_NPI] FROM [GROUP]"
Forms!loclistingfrm!LocationListSubFrm.RecordSource = newRS

当我在设计视图中查看LocationListSubFrm子窗体时，没有Record Source属性。但是，当我直接从对象窗格访问它时，我可以看到它。

这是一个阻止我更改记录源的子窗体吗？在我的应用程序中循环使用相同的子表单，因此我无法在源头编辑它。

Answer 1

请注意，您需要解决子表单控件，而不是（子）表单本身：

Dim newRS As String

newRS = "SELECT DISTINCT [Grp_ID], [Group_Name], [Group_NPI] FROM [GROUP]"
Me!NameOfYourSubformControl.Form.RecordSource = newRS

Answer 2

尝试添加.form.recordsource，如下所示。

Dim newRS
    newRS = "SELECT DISTINCT [Grp_ID], [Group_Name], [Group_NPI] FROM [GROUP]"
    Forms!loclistingfrm!LocationListSubFrm.form.RecordSource = newRS

在Access中设置子窗体的记录源

2 个答案: