Foxtable(狐表)用户栏目专家坐堂 → 查找多列相同行 自动填入 指定数据


  共有1632人关注过本帖树形打印复制链接

主题:查找多列相同行 自动填入 指定数据

帅哥哟,离线,有人找我吗?
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109720 积分:558310 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/9/16 14:13:00 [显示全部帖子]

参考:

Select Case e.DataCol.Name
    Case "入库编号","产品名称","产品批号"
        Dim cnt As Integer = e.DataTable.Compute("Count(产品批号)","入库编号='" & e.DataRow("入库编号") & "' And 产品名称='" & e.DataRow("产品名称") & "' and 产品批号='" & e.DataRow("产品批号") & "' and [_Identify] <= " & e.DataRow("_Identify"))
        e.DataRow("检验提示") = "第" & cnt & "次"
End Select

 回到顶部