以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 删除确认 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=189157) |
-- 作者:1234567 -- 发布时间:2023/11/14 13:57:00 -- 删除确认 通过代码删除行 Dim r As Row = Tables("窗口1_Table1").Current If r IsNot Nothing Then r.Delete() End If 希望跟通过菜单删除一样,删除前,会出现一个提示窗口,如果确认后才会删除。
|
-- 作者:有点蓝 -- 发布时间:2023/11/14 13:58:00 -- http://www.foxtable.com/webhelp/topics/0326.htm |
-- 作者:1234567 -- 发布时间:2023/11/14 14:18:00 -- 我点击提示窗口的确定或取消,都会删除一行 MessageBox.Show("确认要删除这一行吗?", "提示", MessageBoxButtons.OKCancel, MessageBoxIcon.Question) Dim r As Row = Tables("生产管理_Table1001").Current If r IsNot Nothing Then r.Delete() End If
|
-- 作者:有点蓝 -- 发布时间:2023/11/14 14:22:00 -- 参考示例五的用法进行判断 |