[已解决]两表对比

f1314520

回复 那么的帅 的帖子

请教一下，你将一个字典，先后赋两个关键字及其对应的项，是不是第一次赋的值有，而第二次赋的值为空的，就不会覆盖掉之前的？
    For i = 1 To UBound(Arr1)
        D(Arr1(i, 1) & "~" & Arr1(i, 2)) = Arr1(i, 1) & "~" & Arr1(i, 2) & "~" & Arr1(i, 3) & "~~"
        '将关键字：Arr1(i, 1) & "~" & Arr1(i, 2)加入字典D，对应的项为：Arr1(i, 1) & "~" & Arr1(i, 2) & "~" & Arr1(i, 3) & "~~"
    Next i
    For i = 1 To UBound(Arr2)
        D(Arr2(i, 1) & "~" & Arr2(i, 2)) = Arr2(i, 1) & "~" & Arr2(i, 2) & "~" & Arr2(i, 3) & "~" & Arr2(i, 4) & "~" & Arr2(i, 5)
        '将关键字：Arr2(i, 1) & "~" & Arr2(i, 2)加入字典D，对应的项为：Arr2(i, 1) & "~" & Arr2(i, 2) & "~" & Arr2(i, 3) & "~" & Arr2(i, 4) & "~" & Arr2(i, 5)
    Next i

冲天妖狐

那么的帅真的帅！学习了……

joyark

学习 谢谢分享