Foxtable(狐表)用户栏目专家坐堂 → 求助代码


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

主题:求助代码

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


加好友 发短信
等级:小狐 帖子:376 积分:4189 威望:0 精华:0 注册:2008/9/1 14:18:00
求助代码  发帖心情 Post By:2010/3/24 10:10:00 [显示全部帖子]

判别A表某行某列的值是否符B表某行某列的代码如何写?请狐友们帮助解决

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


加好友 发短信
等级:小狐 帖子:376 积分:4189 威望:0 精华:0 注册:2008/9/1 14:18:00
  发帖心情 Post By:2010/3/24 10:47:00 [显示全部帖子]

For Each dr as DataRow in DataTables("Zstb").DataRows
    For Each dr1 as Datarow in DataTables("Zszy").Datarows
        For Each dc as Datacol in DataTables("Zszy").Datacols
            if dr(dc.name) = dr1(dc.name) then
                Return
            else
                dr(dc.name) = "错误"
            end if
        next
    next

上述代码正确吗?

 回到顶部
帅哥哟,离线,有人找我吗?
lpxjw_zyl
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:376 积分:4189 威望:0 精华:0 注册:2008/9/1 14:18:00
  发帖心情 Post By:2010/3/24 11:19:00 [显示全部帖子]

老六我是正确的不修改他,错误的提示?

 回到顶部
帅哥哟,离线,有人找我吗?
lpxjw_zyl
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:376 积分:4189 威望:0 精华:0 注册:2008/9/1 14:18:00
  发帖心情 Post By:2010/3/24 11:24:00 [显示全部帖子]

For Each dr as DataRow in DataTables("Zstb").DataRows
    For Each dr1 as Datarow in DataTables("Zszy").Datarows
        For Each dc as Datacol in DataTables("Zszy").Datacols
           
            if dr(dc.name) = dr1(dc.name) then
                exit for
            else
                dr(dc.name) = "错误"
            end if
        next
    next
Next

上述代码是判别表ZSTB的某列的值等于表ZSZY某列的值时,执行下一循环,不等时在ZSTB的某列显示错误

 回到顶部
帅哥哟,离线,有人找我吗?
lpxjw_zyl
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:376 积分:4189 威望:0 精华:0 注册:2008/9/1 14:18:00
  发帖心情 Post By:2010/3/24 11:33:00 [显示全部帖子]

请帮助解决,我硬是想不出来道理。


 回到顶部
帅哥哟,离线,有人找我吗?
lpxjw_zyl
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:376 积分:4189 威望:0 精华:0 注册:2008/9/1 14:18:00
  发帖心情 Post By:2010/3/24 12:16:00 [显示全部帖子]

图片点击可在新窗口打开查看
yangming不行

 回到顶部