Question

我创建的主要表单的目的是允许我的同事能够在一个地方输入我们获得的各种投诉的信息。我们有三种类型的投诉，每种投诉都有自己的表格，其中一个是我主要表格中的子表格。子表格表格的主键由用户输入。我还没有找到一种方法将主键添加到为该条目生成的记录中。我正在使用MS Access 2007和唯一能够做我想要的代码：

    Private Sub Booking_Reference_Number_Exit(Cancel As Integer)
     If Not IsNull(Form![Booking Reference Number]!PK_Booking_Ref_Number) Then
      Dim mydb As Database
      Dim rst As DAO.Recordset

      Set mydb = CurrentDb()
      Set rst = mydb.OpenRecordset("Incident_Report")

      rst.AddNew
      rst![FK_Booking_Ref_Number] = Form![Booking Reference Number]!PK_Booking_Ref_Number
      rst.Update

      Set rst = Nothing
      Set mydb = Nothing

     End If
    End Sub

感谢您的帮助。

Answer 1

您是否尝试将FK字段的默认值（在子窗体上）设置为主窗体上PK的名称？例如 - [MainForm]！[ControlName]

包括Subform主键到主表单外键

1 个答案: