以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  动态生成表刷新问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=116045)
--  作者：夜散点炽
--  发布时间：2018/3/19 11:08:00
--  动态生成表刷新问题
我用以下代码动态添加了表，现在想刷新这个表，怎么做？

这是在一个弹出的窗口中动态添加的表

With Tables("ACCOUNTS_BACKLOG_D")
Dim tbl As WinForm.Table
tbl = e.Form.CreateSQLQuery("Table1", "Select * fro m " & .Rows(.Position)("title") & " where id=" & .Rows(.Position)("id") ,"zh1_1")
tbl.SetBounds(10, 10, 905, 350)
e.Form.Controls("TabControl1").TabPages(0).AddControl(tbl)
End With

我想下移一行后再刷新这张表用以下代码，发现并没有刷新

With Tables("ACCOUNTS_BACKLOG_D")
 .Position = .Position - 1
DataTables("审批窗口_Table1").load
End With
--  作者：有点甜
--  发布时间：2018/3/19 11:13:00
--  

要用fill执行sql语句，才能刷新表，如

 

http://www.foxtable.com/webhelp/scr/1777.htm