Foxtable(狐表)用户栏目专家坐堂 → [求助]包含查找出错


  共有2204人关注过本帖树形打印复制链接

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

帅哥哟,离线,有人找我吗?
瞩望星空
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:531 积分:4727 威望:0 精华:0 注册:2013/4/20 20:08:00
[求助]包含查找出错  发帖心情 Post By:2014/11/26 19:31:00 [显示全部帖子]

表B的实际行数有许多,现在需要达到根据表C中第二列的字符,用表C第一列去替换表B的第一列。

条件是:表B第二列的内容包含了表C第二列的内容。

以下写法达不到目的,请指正。

 

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

 

 

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:包含查找.table


 回到顶部
帅哥哟,离线,有人找我吗?
瞩望星空
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:531 积分:4727 威望:0 精华:0 注册:2013/4/20 20:08:00
  发帖心情 Post By:2014/11/26 20:27:00 [显示全部帖子]

谢谢甜总。

假如一定要从表B开始“遍历”

dr2 = DataTables("表B").Find("[第二列] like '%" & dr1("第二列") & "%'")

这个语句有没有可改写的可能?


 回到顶部