以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  请问哪里有错？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=86497)

--  作者：kmzb56 --  发布时间：2016/6/18 22:55:00 --  请问哪里有错？ Dim xuhao As  Integer=Tables("任务查询2_table3").Current("序号") If xuhao > 0  Then Tables("任务查询2_Table2").Filter = "[序号] = xuhao " End If

--  作者：新福星 --  发布时间：2016/6/19 8:28:00 --   需要判断Tables("任务查询2_table3").Current  这一行是否存在

--  作者：kmzb56 --  发布时间：2016/6/19 8:43:00 --   就是在那窗口上的呀，怎么判断？

--  作者：狐狸爸爸 --  发布时间：2016/6/19 21:21:00 --   Dim r As Row = Tables("任务查询2_table3").Current If  r IsNot Nothing Then     Dim xuhao As  Integer = r.Current("序号")     If xuhao > 0  Then         Tables("任务查询2_Table2").Filter = "[序号] = xuhao "     End If End If

--  作者：Hyphen --  发布时间：2016/6/20 8:05:00 --   Tables("任务查询2_Table2").Filter = "[序号] = " & xuhao