Foxtable(狐表)用户栏目专家坐堂 → [求助]根据表B某单元格值,来决定表A当前行是否选中,如何表达?


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

主题:[求助]根据表B某单元格值,来决定表A当前行是否选中,如何表达?

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


加好友 发短信
等级:幼狐 帖子:134 积分:1047 威望:0 精华:0 注册:2014/11/24 11:07:00
[求助]根据表B某单元格值,来决定表A当前行是否选中,如何表达?  发帖心情 Post By:2014/11/30 15:13:00 [只看该作者]

用代码表达的大意如下(代码中报错)

 

For Each Dr As DataRow In Tables("表A").DataRow
    With Dr
        If ( .("第一列") = Tables("表B").Value(0,"第二列"))
            .Checked = True
        End If
    End With
Next

 

该如何更正代码? 

[此贴子已经被作者于2014-11-30 15:24:25编辑过]

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/11/30 15:31:00 [只看该作者]

For Each r As Row In Tables("表A").Rows
    If r("第一列") = Tables("表B").Value(0,"第二列")
        r.Checked  = True
    End If
Next

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/11/30 15:32:00 [只看该作者]

For Each r As Row In Tables("表A").Rows
    If r("第一列") = Tables("表B").Value(0,"第二列")
        r.Checked  = True
    Else
        r.Checked = False
    End If
Next

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


加好友 发短信
等级:幼狐 帖子:134 积分:1047 威望:0 精华:0 注册:2014/11/24 11:07:00
感谢!!!  发帖心情 Post By:2014/11/30 15:39:00 [只看该作者]

按照您的指导改成功了。

 

是我太笨,脑袋糨糊,居然连表达式的写法还没过关。

 

再次感谢!


 回到顶部