access2010开发教程第4章第7节

时　间:2012-04-25 13:01:02
作　者:Access软件网编著   ID：8  城市：上海  QQ：3059255
摘　要:4.7 删除功能的添加
正　文:

4.7 删除功能的添加
相对于新增功能和修改功能而言，删除功能的制作就显得相当简单了。
进入 frmyg_child 窗体的设计视图，之后直接进入该窗体的代码页面，如下图所示：

新起一行，输入以下代码：

Public Sub btnDel()
If MsgBox("您确认要删除吗?", vbYesNo + vbInformation, Forms!usysfrmLogin.Caption) = vbYes Then
DoCmd.Echo False
Call AccHelp_DeleteFldstrRow ("tblCodeyg", "ygId", selectstr)
Forms!usysfrmMain!frmChild.SourceObject = "frmyg_child"
DoCmd.Echo True
End If
End Sub

确认无误之后，保存修改，之后再如前所述，添加导航按钮的删除属性，之后再赋予管理员组删除权限。测试一下删除的效果吧.

相关索引: 上一节 下一节