表A和表B有四列对应,第一列是文本列,第二列,第三列,第四列为数字,如果数字列有空值时,查到不到对应的行
代码如下:
Dim dr As DataRow = DataTables("表A").DataRows(0)Dim dr1 As DataRowdr1 = DataTables("表B").Find("第一列 = '" & dr("第一列") & "' and 第二列 = " & dr("第二列") & " and 第三列 = " & dr("第三列") & " and 第四列 = " & dr("第四列"))dr1("第五列") = dr("第五列")