主题：[求助]精准控制列的问题？

用的外部数据源：求怎样实现精准控制列的权限输入。。谢谢！

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.table

Datacolchanging事件

 

Select Case e.DataCol.Name
    Case "第二列", "第三列", "第四列"
        If e.DataRow("发出人") <> user.Name Then
            e.Cancel = True
        End If
    Case "第六列", "第七列", "第八列"
        If e.DataRow("接收人") <> user.Name Then
            e.Cancel = True
        End If
End Select

谢谢！