主题：怎样限制使得已经填报的数据不能修改，删除，除非管理员

 在  全局表事件 中的 StartEdit 事件

If e.Row.DataRow.IsNull(e.Col.DataCol) = False Then
    If User.Name <> "管理员" Then
        e.Cancel = True
        Messagebox.show("只有管理员才有权修改和删除记录!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    Else
        e.Cancel = False
    End If
End If

然后在 项目事件 中的 Initialize事件

For Each dt As DataTable In DataTables
    dt.GlobalHandler.StartEdit  = True
Next

这样控制的是所有表