SubForm选择行与编辑源

Question

我有一个SubForm (“主菜单SubForm")，它在MainForm (主菜单)上.我想在SubForm上选择一行，然后它将相应的行拉到另一个表单中进行编辑。

我有以下代码，但它似乎不像我所期望的那样：

Private Sub Form_Activate()
    Me.Requery
    If IsLoaded("Main Menu") Then
        If Forms![Main Menu]![Main Menu SubForm].Form.RecordsetClone.RecordCount > 0 Then
            DoCmd.GoToControl "txtWOrderID"
            DoCmd.FindRecord Forms![Main Menu]![Main Menu SubForm].Form![WOrderID]
        End If
    End If
End Sub

我附加了一个链接到我的数据库，以供参考，如果需要：存取发票系统

Answer 1

最后，我从主表单中完成了这一工作：

Private Sub btnViewWorkOrder_Click()
    DoCmd.OpenForm "Work Order", acNormal, , "[WOrderID] = '" & Forms![Main Menu]![txtWOrderID] & "'", acFormEdit, acDialog
End Sub

Answer 2

我会做类似的事情(这是航空代码，所以需要调整)：

forms!WOrderID.RecordSource = "Select * from MyTable where WOrderID = " & me.txtWOrderID & ""
Forms!wOrderID.Refresh