删除记录有很多种方法,比较常用的有ADO、DAO 和 Docmd。
Docmd删除记录 DoMenuItem 方法:
Me.子窗体.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
Me.子窗体.Form.Requery '删除后刷新子窗体 以反映新的数据变化
Docmd删除记录 RunCommand 方法:
Me.子窗体.Form.AllowDeletes=True '这句话很重要,如果是False,这个方法就不适用。后面有需要再自行修改回来
Me.子窗体.SetFocus
DoCmd.RunCommand acCmdDeleteRecord
Me.子窗体.Form.Requery '删除后刷新子窗体 以反映新的数据变化
Docmd删除记录 RunSQL 方法:
Dim strSQL As String
Me.子窗体.SetFocus
strSQL = "Delete from 表名 where 条件"
DoCmd.RunSQL strSQL
Me.子窗体.Form.Requery '删除后刷新子窗体 以反映新的数据变化
Access软件网交流QQ群(群号:198465573) |