以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  条码的有效检验  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=92788)

--  作者:lhfu
--  发布时间:2016/11/13 10:27:00
--  条码的有效检验
各位老师好,我在狐表里做了一个检验条码的两列数据,但通过筛选的结果,它只会显示在当列,而不是将数据结果反馈到其它列,这个应该怎么解决?请老师解答一下,谢谢!
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.zip


--  作者:y2287958
--  发布时间:2016/11/13 10:33:00
--  
没看明白
--  作者:有点色
--  发布时间:2016/11/13 10:45:00
--  

For Each dr As DataRow In DataTables("表A").datarows
    Dim fdr As DataRow = dr.DataTable.find("a列条码 = \'" & dr("b列条码") & "\'")
    If fdr IsNot Nothing Then
        dr("检查B列当中有哪些是A列没有的") = Nothing
    Else
        dr("检查B列当中有哪些是A列没有的") = dr("b列条码")
    End If
Next

For Each dr As DataRow In DataTables("表A").datarows
    Dim count As Integer = dr.DataTable.compute("count(_Identify)", "a列条码 = \'" & dr("a列条码") & "\'")
    If count <= 1 Then
        dr("检验A列条码是否重复") = Nothing
    Else
        dr("检验A列条码是否重复") = count
    End If
Next

 


--  作者:lhfu
--  发布时间:2016/11/15 0:10:00
--  
老师好,我是一个新手,请问这行公式应该在哪个地方输入的?
--  作者:有点蓝
--  发布时间:2016/11/15 8:29:00
--  
1、直接在命令窗口运行:http://www.foxtable.com/webhelp/scr/2642.htm

2、写到窗口按钮事件之类的