如何用代码来删除一子窗体中的所有记录阿！

birdsmile · 发表于 2003-10-22 05:53:00

大家好啊，现在想用事件过程来实现删除子窗体中的全部记录，该怎么写呢？麻烦大伙了，谢谢先：）详见附件：

ADAM · 发表于 2003-10-22 15:34:00

兩個辦法:
1.用向導精靈做一個刪除按鈕...
2:如果有設定主窗體記錄與子窗體記錄完整參照,則刪除主窗體記錄時,子窗體記錄一起刪除.
3.如果興刪除子窗體某一條記錄,則先加一條命令,將焦點參照到子窗體
刪除按鈕命令如下:
Private Sub Command7_Click()
On Error GoTo Err_Command7_Click

DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

Exit_Command7_Click:
Exit Sub

Err_Command7_Click:
MsgBox Err.Description
Resume Exit_Command7_Click

End Sub

birdsmile · 发表于 2003-10-22 17:30:00

谢谢ADAM的回复，，不过要怪我没有说清楚，，我想要的是只删除子窗体中记录而保留主窗体记录，所以用向导做的就没有办法了，。“3.如果興刪除子窗體某一條記錄,則先加一條命令,將焦點參照到子窗體” 这个命令要怎么写啊，删除子窗体中的所有记录可以吗？

ADAM · 发表于 2003-10-22 19:03:00

用這個吧...
CurrentDb.Execute "delete * from 子表單參照資料表名 where 識別碼='" & Me.識別碼 & "'"

ADAM · 发表于 2003-10-22 19:22:00

先加一條命令,將焦點參照到子窗體:
DoCmd.GoToControl me.子表單名稱.Name

徐阿鹏 · 发表于 2003-10-22 20:39:00

给你改了，你看看

birdsmile · 发表于 2003-10-23 17:06:00

哇，谢谢ADAM和阿鹏的热心帮忙！我先消化消化：）噢。。。先looklook去^^

aries1912 · 发表于 2009-10-15 13:11:15

真是好用，多谢了

zzgily · 发表于 2009-10-18 15:07:30

呵呵~~~~~

see000 · 发表于 2009-10-30 12:30:41

谢谢示例分享

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

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

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

[窗体] 如何用代码来删除一子窗体中的所有记录阿！

本帖子中包含更多资源

本帖子中包含更多资源

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