主题：3月6日第二次更新后，代码不起作用了

下面代码有什么问题吗？刚换上3月6日第二次更新后，就不起作用了，之前还好好的呀？～

Dim bc As integer = Tables("表A").Current("编号")
Dim dr As DataRow = DataTables("表b").Find("[编号]  = '" & bc & "'")
if dr isnot nothing  then
If Tables("表A").Current("摘要") <> dr("摘要") andalso Tables("表A").Current("分号") = dr("分号") Then
      e.Style = "是否修改过"     （这是自定义样式）
   elseif Tables("表A").Current("品名") <> dr("品名") andalso Tables("表A").Current("分号") = dr("分号") Then
      e.Style = "是否修改过"
   elseif Tables("表A").Current("金额") <> dr("金额") andalso Tables("表A").Current("分号") = dr("分号") Then
      e.Style = "是否修改过"
End If
End If