以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何遍历所有的表名?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=150681)

--  作者:天宇科技
--  发布时间:2020/6/4 17:18:00
--  如何遍历所有的表名?
如何遍历所有的表名?我想写一个删除所有表的行的代码。
[此贴子已经被作者于2020/6/4 17:29:26编辑过]

--  作者:有点蓝
--  发布时间:2020/6/4 17:30:00
--  
参考:http://www.foxtable.com/webhelp/topics/0365.htm
--  作者:天宇科技
--  发布时间:2020/6/4 17:40:00
--  
forms("主窗口").open
If MessageBox.Show("你确定要初始化系统吗?这将会删除所有的数据,请确认!","警告",MessageBoxButtons.YesNo) =DialogResult.Yes  Then
    For Each dt As DataTable In DataTables
        DataTables(dt.Name).DeleteFor("")
    Next
End If
forms("主窗口").open

谢谢
[此贴子已经被作者于2020/6/4 17:40:15编辑过]