主题：[求助]两表模糊匹配

 Datacolchanged事件加入代码

If e.DataCol.Name = "B1列" Then
    Dim fdr As DataRow = DataTables("表A").Find("A1列 Like '%" & e.NewValue.replace("*", "[*]") & "%'")
    If fdr IsNot Nothing Then
        e.DataRow("A1列") = fdr("A1列")
    End If
End If