主题：再求 高效率查询代码

就是看不懂你的文本啊， 9楼的表A第三列应该等于什么吧。。。。。

等于  查询到的 b表的第三列 值

b表哪有第三列？？？

应该是表B的第四列吧：

 

For i As Integer = 0 To CurrentTable.count-1
    Dim r As Row = CurrentTable.Rows(i)   
    If r.isnull("第三列")
        Dim drs As List(Of DataRow)
        drs = DataTables("表A").Select("[物料代码] = '" & r("物料代码") & "'")
        For Each dr As DataRow In drs
            Dim drb As DataRow
            drb = DataTables("表B").Find("[物料代码] = '" & r("物料代码") & "'")
            If drb IsNot Nothing Then
                dr("第三列") = drb("第四列")
            End If
        Next
    End If
Next

这个方法不够效率。。。

 

效率的标准是什么，几秒？

呵呵，我已经被绕晕了，无法下手。

其实你可以根据你的需求，写出你自己的代码，这样大家看起来才明白一点，然后看看你的代码有没有优化的可能。

看看能不能参考这个:

EXISTS子查询

EXISTS用于判断子查询是否有记录。

例如要列出所有订购过产品的客户资料：

SELECT * FROM {客户} WHERE EXISTS (SELECT * FROM {订单} WHERE {订单}.客户ID = {客户}.客户ID)

有交集,执行循环操作,无则跳到下一个表

老爹  你不是吧   我可全 指望你了    我还以为你 消失了  5个小时 之后 已经 帮我搞定了呢   

 

现在  这个数据量  在 K3上  耗时是   35 分钟    我觉得 这样 不科学   所以 一定要想出  高效率的   

 

老爹 你再辛苦一下  帮我 想   我自己 也 想想     熬了 3个通宵了   累了  先睡会   嘎嘎   

我测试我的后，一万行也就5秒钟（我的电脑是06年的）。