以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  查找某一个字符串是否包括另一个字符串  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=148558)
--  作者：133198609
--  发布时间：2020/4/10 9:41:00
--  查找某一个字符串是否包括另一个字符串
表A    第一列      地址全称A

表B    第一列      地址简称B

需要找出表A中哪些地址包含了表B中的地址
用.Find 怎么找出？

注意：A是长地址，B是短地址 ，不能用等号。

For Each dr As DataRow In DataTables("表B").DataRows
    If e.DataRow("农民工地址").Contains(dr("简称")) =True Then
        e.DataRow("相似贫困县") = dr("简称")
    Else
        e.DataRow("相似贫困县") = ""
    End If
Next

上面这段代码会导致非法关闭。
--  作者：有点蓝
--  发布时间：2020/4/10 10:05:00
--  
先看看：http://www.foxtable.com/webhelp/topics/1522.htm

代码在什么事件？贴出完整代码？

dim dr as datarow = DataTables("表B").find(e.DataRow("农民工地址") & " like \'%\' + 简称 + \'%\'\'" )
if dr isnot nothing then
        e.DataRow("相似贫困县") = dr("简称")
    Else
        e.DataRow("相似贫困县") = nothing
end if
--  作者：133198609
--  发布时间：2020/4/10 11:28:00
--  
哎呀，知道自己错哪了。

指点的到位，就是忘记判断列了