主题：[求助]老大 问题依旧！ 求助

在非“A卡录入”这个窗口使用“A卡录入_Table1”这个表的时候，加个判断，例如：

 

    Dim t As Table = Tables("A卡录入_Table1")

   Dim u As Table = Tables("A卡录入与审查_A卡录入与审查table1")

    With Tables("A卡录入与审查_A卡录入与审查table2")

        If .Current Is Nothing Then

            t.Filter = "False"

            u.filter = "False"

        Else

            t.filter = "编号 = '" & .Current("编号") & "'"

            u.filter = "编号 = '" & .Current("编号") & "'"

        End If

End With

 

改为：

 

If Table.Contains("A卡录入_Table1") Then

     Dim t As Table = Tables("A卡录入_Table1")

     Dim u As Table = Tables("A卡录入与审查_A卡录入与审查table1")

     With Tables("A卡录入与审查_A卡录入与审查table2")

         If .Current Is Nothing Then

              t.Filter = "False"

              u.filter = "False"

          Else

              t.filter = "编号 = '" & .Current("编号") & "'"

              u.filter = "编号 = '" & .Current("编号") & "'"

          End If

      End With

End If

 

还是没用~~~~~~~~~

 

还是找不到A卡录入_Table1