[求助]如何防止单元格内数据误删？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]如何防止单元格内数据误删？

共有3137人关注过本帖树形打印复制链接主题：[求助]如何防止单元格内数据误删？

chh2321

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：童狐帖子：253 积分：2573 威望：0 精华：0 注册：2016/8/8 9:50:00

[求助]如何防止单元格内数据误删？ 发帖心情

Post By：2019/1/25 15:19:00 [显示全部帖子]

老师，如果每一列单元格内已有数据，如何防止按delete键全部删除，但是可以通过Backspace键逐字删除？

chh2321

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：童狐帖子：253 积分：2573 威望：0 精华：0 注册：2016/8/8 9:50:00

Post By：2019/1/25 19:36:00 [显示全部帖子]

If e.keycode = keys.delete Then

Dim del As DialogResult

del = MessageBox.Show("你确认要删除数据吗?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)

If del = DialogResult.Yes Then

Return

Else

e.cancel = True

End If

该段代码不能判断单元格内是否有数据。

如果有数据就弹出提示，没有数据就不弹出对话框，如何书写代码？谢谢老师！

主题：[求助]如何防止单元格内数据误删？