楼主这个是可以做到的,问题的前题是您要先启用自定义登录系统才行,也就是说给每个人分配帐户(_Username)与组别(_UserGroup),然后在您需要统计的部门费用表中增加一列部门列,这样任何一个人登录,他的所属部门被保存到了_UserGroup中,所以我们就可以在部门费用表中的
PrepareEdit
事件中填加代码
If e.Col.Name = "部门" AndAlso e.Row("部门") <> _UserGroup Then
e.Cancel = True
End If
这样不是一个部门的人就不能处理该部门的数据了
然后填加的时候,你就在
DataRowAdding
事件中填加
e.datarow("部门") =_UseGroup
这样他填加的也是本部门的数据,试试吧,看看行不行