以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  单号相同自增一  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=172284)
--  作者：11112
--  发布时间：2021/10/6 11:25:00
--  单号相同自增一
老师您好我想问一下单号相同的情况下，状态自增1怎么弄
--  作者：z769036165
--  发布时间：2021/10/6 13:56:00
--  
需求说的不清楚啊，是单号单元格的内容输入后，如果是存在相同的，就取到该单号对应的最大状态值并+1么？
--  作者：11112
--  发布时间：2021/10/6 14:03:00
--  
就是我新增加的时候判断这个单号是否有重复相同的，如果有话就在状态列+1,状态没有重复值是0
--  作者：z769036165
--  发布时间：2021/10/6 14:16:00
--  
DataColChanged

If e.DataCol.Name = "单号" Then
    If  e.DataTable.Compute("count(单号)","单号 = \'"&  e.DataRow("单号") & "\'") > 1 Then
        e.DataRow("状态") = 1
    Else
        e.DataRow("状态") = 0
    End If
End If

根据需求参考执行