用代码表达的大意如下(代码中报错)
For Each Dr As DataRow In Tables("表A").DataRow With Dr If ( .("第一列") = Tables("表B").Value(0,"第二列")) .Checked = True End If End WithNext
该如何更正代码?