以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]根据表B某单元格值，来决定表A当前行是否选中，如何表达？  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=60745)
--  作者：whyfoxtable
--  发布时间：2014/11/30 15:13:00
--  [求助]根据表B某单元格值，来决定表A当前行是否选中，如何表达？

用代码表达的大意如下（代码中报错）

 

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编辑过]
--  作者：有点甜
--  发布时间：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
--  作者：有点甜
--  发布时间：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
--  发布时间：2014/11/30 15:39:00
--  感谢！！！

按照您的指导改成功了。

 

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

 

再次感谢！