按用户组设置删除或增加行权限问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

老师：我用用户组在表中设置增加行和删除行，有些表执行，有些表不执行，代码如下，麻烦纠正我的错误点。另外我要是增加多个用户组需要怎么写？

表事件/增加行BeforeAddDataRow

If User.Group = "仓库" Then

e.Cancel = True

Messagebox.show("你无权增加!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)

End If

表事件/删除行BeforeDeleteDataRow

If User.Group = "仓库" Then

e.Cancel = True

Messagebox.show("你无权删除!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)

End If

主题：按用户组设置删除或增加行权限问题