主子窗体中如何才能在子窗口中无数据自动删除？

jia　发表于：2010-12-22 14:12:23 　

复制

老师们好：

在一个主、子联接的窗口中，如何设置才能在子窗口中无数据时，自动将主条目内内容删除？

谢谢

点击下载此附件

Top

煮江品茶发表于：2010-12-22 15:15:03

我一般在窗体的关闭事件处理这个问题。可以以主表的ADO数据集循环计算子表满足主表ID的Dcount结果是不是为0

，如果为0则删除这条记录。

Top

jia 发表于：2010-12-22 15:24:56

煮江品茶老师们好：

能不能做一个例子哪？

Top

煮江品茶发表于：2010-12-22 15:32:07

把一下代码放到窗体的关闭事件中更为合理：

Dim rs As New ADODB.Recordset
Dim i As Long
rs.Open "表1", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
For i = 1 To rs.RecordCount
    If DCount("*", "表2", "ID=" & rs("ID").Value) = 0 Then
        rs.Delete
        rs.Update
    End If
    rs.MoveNext
Next
rs.Close

点击下载此附件

Top

jia 发表于：2010-12-22 15:53:45

谢谢煮江品茶老师！

Top

总记录：4篇页次：1/1 9 1 :

Access交流中心

主子窗体中如何才能在子窗口中无数据自动删除？