如何删除子窗体中的当前记录

Question

我的表格如下。

父表单：CustomerForm 子表单：OrderForm - 在DataSheet视图中

每个客户都可以获得更多订单。

如果我选择了一个订单，然后点击“删除”＃39;按钮，它必须删除。我无法获得当前记录及其字段。

No = Me.Form.CurrentRecord

有人请帮助。

感谢。

Answer 1

无需存储当前记录。使用子窗体中所选记录的唯一标识符将其选中，然后使用Docmd.RunSQL。假设按钮位于Mainform“Main”上，而子表单“Sub”中的记录带有标识符“id”：

    Dim sSQL as String
    sSQL = "DELETE FROM myTable WHERE id = " & Me!Sub!id
    DoCmd.RunSQL sSQL
    Me!Sub.Requery