2017-03-04 60 views
0

我有以下:分配ID到表格(表格字段)通过场开业=是

形式:sbfrm_lenderProducts

在其中具有场:appraisalMethods

字段appraisalMethods具有combo-框值列表与答案:'是的;没有;要看

我有以下代码(VBA模块)来打开窗体(frm_appraisalTypes)当值appraisalMethods =是

If Me.[appraisalMethods].Value = "YES" Then 
    DoCmd.OpenForm "frm_appraisalTypes" 
End If 

它工作正常。想知道我是否能够将代码添加到代码中,以便将来自sbfrm_lenderProducts的记录ID分配给开始窗体frm_appraisalTypes。

为了便于说明,sbfrm_lenderProducts具有主键lenderProductsID,而frm_appraisalTypes(联结表)具有外键lenderProductsID。当表单打开时,我希望外键lenderProductsID与正在编辑的记录中的主键匹配。

回答

1

您可以使用OpenArgs参数。 在sbfrm_lenderProducts:

If Me.[appraisalMethods].Value = "YES" Then 
    DoCmd.OpenForm "frm_appraisalTypes", , , , , , Me.[ID] 
End If 

在frm_appraisalTypes ID值将在Me.OpenArgs

+0

好极了!这工作。非常感谢。 –