以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 救助:对比两列取第三列的数据,不报错,但没反应? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=158180) |
-- 作者:xnsiwei -- 发布时间:2020/11/10 16:37:00 -- 救助:对比两列取第三列的数据,不报错,但没反应? 救助:对比两列取第三列的数据,不报错,但没反应? For Each dr1 As DataRow In DataTables("nwxhzsf").datarows Dim dr2 As DataRow = DataTables("xnncshwsmchzxcxpt").find("Xzc=\'" & dr1("Xzc") & "\' AND Zrc=\'" & dr1("Zrc") & "\'") If dr2 IsNot Nothing Then dr1("Hjrk1") = dr2("Hjrk1") End If Next 谢谢指点!
|
-- 作者:有点蓝 -- 发布时间:2020/11/10 16:40:00 -- 代码没有问题,没反应就应该是没有符合条件的数据 |
-- 作者:xnsiwei -- 发布时间:2020/11/10 20:39:00 -- 谢谢,搞定 |