以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  一键清除10个副本表中的所有行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=140092)

--  作者:deliangzhaoe
--  发布时间:2019/8/29 11:14:00
--  一键清除10个副本表中的所有行
窗口中加一页面集合,每个页面集合中有一个副本表,共10个副本表,分别为table1-table10,想在窗口中加一个按钮,用于一键清除所有副本表的行,窗口关闭时也清除所有行,按钮和beforeclose分别如何写代码?谢谢
[此贴子已经被作者于2019/8/29 11:14:44编辑过]

--  作者:有点蓝
--  发布时间:2019/8/29 11:25:00
--  
窗口关闭没有必要清除,副本表会自行销毁。

按钮

dim t as table
for i as integer = 1 to 10
    t = tables("窗口1_Table" & i)
    for j as integer = t.rows.count - 1 to 0 step -1
        t.rows(j).delete
    next
next

--  作者:deliangzhaoe
--  发布时间:2019/8/30 18:15:00
--  
如果想一键导出这十个副本表的内容,怎么设置按钮代码?
分开导出,导出后还是10个表

--  作者:有点蓝
--  发布时间:2019/8/30 20:21:00
--  
只能自己写代码导,参考:http://www.foxtable.com/webhelp/topics/1148.htm