以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何比对数据  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=15370)

--  作者:lsfdf
--  发布时间:2011/12/22 16:26:00
--  如何比对数据
如何点核对,检查,右表的数据和品种和左表的数据和品种是否一致,并给予提示,谢谢
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目4.table


--  作者:blackzhu
--  发布时间:2011/12/22 17:06:00
--  

Dim drs As List(Of DataRow)
drs= DataTables("表C").Select("产品 =\'" & Tables("表B").Current("产品") & "\'")
For Each dr As DataRow In drs
    Dim cnt As Integer = DataTables("表C").Compute("Count(产品)","产品 =\'" & dr("产品") & "\'")
    MessageBox.Show("找到共" & cnt & "条")
Next

 

 这个是有几条数据符合的就提示几次.


--  作者:lsfdf
--  发布时间:2011/12/22 17:20:00
--  

是想提示,右表的数据是否和左边的数据一致,提示:”是或者否“(也就是判断右边的品种和数量要和左边的品种数据一致)


--  作者:狐狸爸爸
--  发布时间:2011/12/22 18:10:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目4.table