主题：[求助]通过表A勾选逻辑列，表B继承表A部分列

 没看明白你6楼的意图。断号可参考 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=85293&skin=0

递增的序号

e.DataRow("序号") = e.DataTable.Compute("max(序号)") + 1

重置的序号

Dim dic As new Dictionary(Of Integer, Integer)
Dim i As Integer = 1
For Each r As Row In Tables("表B").rows
    If dic.ContainsKey(r("序号")) = False Then
        dic.Add(r("序号"), i)
        i += 1
    End If
    r("序号") = dic(r("序号"))
Next