主题：如果右边的表格b有与表a相同的数据 如何隐藏左边表a中相同的数据

如果右边的表格b有与表a相同的数据 如何隐藏左边表a中相同的数据     如果右边表b 中 商品名称列中 有 与表a 中 的商品名称 相同的行，则隐藏 表a 中相同的行。 这样可以么？ 此主题相关图片如下：??.png

Dim names As New List(Of String)
Dim r As Row
For Each r In Tables("B").Rows
If r("商品名称")<>"" Then names.add(r("商品名称"))
Next
For Each r In Tables("A").Rows
If Names.Contains(r("商品名称"))= True Then
r.Table.Position= r.Index

非常非常感谢！！但是我不知道应该放在什么事件里，因为表a 是一个sql查询表。在窗口里生成的。 所以还望详解

如果是打开窗口后就执行，那么放在form的afterload事件中（在SQL表A生产代码后面），要是打击按钮执行的话，放在按钮的click事件中

非常感谢，还是有问题。我现在需要的是左边的行能够隐藏，结果是右边的行输入数据后就直接被隐藏了， 把表明换了也不行。 是什么问题呢？