主题：如何实现以下的目的，谢谢

有“补偿标准表”一张，其他补偿计算表都是根据：补偿数量*补偿标准表中的补偿标准（表达式），计算得到！！

如何判断当其他补偿计算表使用过补偿标准表中的补偿标准，并且做到使用过的补偿标准是不能更改和删除的？

不就是判断其它各表是否存在对应的行，如果存在，就取消编辑和删除吗？

其他表上没有对应的补偿标准列，补偿数是通过表达式计算得来的！！！

不上传示例文件，别人也难以下手！

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

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

就是根据后面的土地、房屋表判断，标准表中的那些标准使用过，如果使用过则不能更改和删除

设置补偿标准表的PrepareEdit事件代码：

 

Dim nms() As String = {"土地补偿","房屋补偿"}
For Each nm As String In nms
    For Each c As col  In Tables(nm).cols
        If c.name.StartsWith(e.Row("补偿物名")) Then
            e.cancel = True
        End If
    Next
Next

 

BeforeDeleteDatarow事件代码自己设计。

做到窗口事件如何实现？

打开窗口或打开项目时，自动判断使用情况，使用的就在使用情况逻辑列上画上√

下一步在根据使用情况逻辑列，实现能否编辑和删除的判断