以文本方式查看主题

-  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=106966)
--  作者：noway143
--  发布时间：2017/9/19 9:47:00
--  [求助]请问怎么清空一个表的所有数据？
数据表中所有数据全部清空，不删除行，只清空数据？
--  作者：有点甜
--  发布时间：2017/9/19 10:16:00
--  

dim t as table = tables("表A")

For Each c As Col In t.cols
    If c.DataCol.Expression = "" Then
        For Each r As Row In t.rows
            r(c) = Nothing
        Next
    End If
Next