主题：[求助]

 1、做个例子上传上来；

 2、必须说清楚逻辑，说清楚最后要得到什么效果。

 1、做一个foxtable例子；

 2、说明怎么操作操作表，最后怎样的效果

 如下

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

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

 那现在有什么问题啊，修改了第二列的值，就是要重新计算一次的。

 那你希望怎么操作，最后怎样的效果。

 自己单独做一个按钮

For Each dr As DataRow In DataTables("表A").Select("")
    Dim fdr As DataRow = DataTables("表A").Find("第二列 = '" & dr("第一列") & "'")
    If fdr IsNot Nothing Then
        fdr("第三列") += 1
    End If
Next