主题：[求助]包含查找出错

Dim dr2 As DataRow
For Each dr1 As DataRow In DataTables("表C").datarows
    dr2 = DataTables("表B").Find("[第二列] like '%" & dr1("第二列") & "%'")
    If dr2 Is Nothing Then
        MessageBox.Show("没有找到此字符串:"  & dr1("第二列") )
    Else
        '如果找到的话
        dr2("第一列")= dr1("第一列")
    End If
Next

 

 那就不能用find，必须循环表C的每一行，比较值。