Fatal编程技术网
  • vba/
  • Vba 在Access中设置子窗体的记录源

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

vba ms-access

Vba 在Access中设置子窗体的记录源,vba,ms-access,Vba,Ms Access,在设计视图中查看LocationListSubFrm子窗体时，没有记录源属性。但是，当我直接从“对象”窗格访问它时，我可以看到它 它是一个子表单这一事实是否阻止我更改记录源？相同的子表单在我的应用程序中循环使用，因此我无法真正在源位置编辑它。尝试添加.form.recordsource，如下所示 Dim newRS newRS = "SELECT DISTINCT [Grp_ID], [Group_Name], [Group_NPI] FROM [GROUP]" Forms!loclisting

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

它是一个子表单这一事实是否阻止我更改记录源？相同的子表单在我的应用程序中循环使用，因此我无法真正在源位置编辑它。

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

Dim newRS
newRS = "SELECT DISTINCT [Grp_ID], [Group_Name], [Group_NPI] FROM [GROUP]"
Forms!loclistingfrm!LocationListSubFrm.RecordSource = newRS
请注意，您需要处理的是子窗体控件，而不是（子）窗体本身：

Dim newRS
    newRS = "SELECT DISTINCT [Grp_ID], [Group_Name], [Group_NPI] FROM [GROUP]"
    Forms!loclistingfrm!LocationListSubFrm.form.RecordSource = newRS
所以，如果我有七个不同的控件，我需要为每个控件重写这一行？这要看情况而定，但听起来像是你想要做的。 
Dim newRS As String

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