【Access VBA】用Docmd 删除记录

盗梦 · 发表于 2013-9-26 09:33:48

本帖最后由盗梦于 2013-9-26 09:49 编辑

【Access VBA】用Docmd 删除记录

      删除记录有很多种方法，比较常用的有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学习交流 · 发表于 2013-9-26 09:43:12

很好，学习了！！

admin · 发表于 2013-9-26 09:44:12

支持一下，这个不错！

daisyjane · 发表于 2013-9-26 09:44:40

谢谢

tmtony · 发表于 2013-9-26 09:45:08

不错的代码. 好的总结!

huangli0356 · 发表于 2013-9-26 09:52:34

总结的好..支持一个.

LeeTien · 发表于 2013-9-26 16:08:29

不错，很有用

daisyjane · 发表于 2013-9-29 16:12:08

谢谢,强

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训群2 (792054000)
Access经典源码培训群 (77130759)
Access源码技巧群 (138920637)
access vba (307776555)

主题相关群

地区相关群[您还没设置居住地]

[模块/函数] 【Access VBA】用Docmd 删除记录

群介绍
主题无相 (随机显示版	同地区群块其他地区)