VBA基础
access中vba用docmd来删除记录的方法
2013-09-27 14:06:29
在access中，删除记录有很种方法， 比较常用的有ADO、DAO 和 Docmd。即便使用docmd，也有3种方法来删除，下面看看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 '删除后刷新子窗体 以反映新的数据变化