以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  新手学习中，在练习中找不到相关资料3  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=88463)
--  作者：281512373
--  发布时间：2016/8/3 14:13:00
--  新手学习中，在练习中找不到相关资料3
删除 表A 所有行只留第一行，然后清空 第一行里面内容
--  作者：njcyt
--  发布时间：2016/8/3 14:22:00
--  
删除选定行后增加一行
With Tables("订单")
    For i As Integer = .BottomPosition To .TopPosition Step -1
        .Rows(i).Delete()
    Next
End With
Tables("订单").AddNew()
--  作者：281512373
--  发布时间：2016/8/3 14:27:00
--  

这个不是我想要的 帮助里面 我看到了

 

按钮代码  删除 表A 所有行只留第一行，然后清空 第一行里面内容

--  作者：大红袍
--  发布时间：2016/8/3 15:31:00
--  

 删除所有，然后新增一行呗。

 

DataTables("表A").deletefor("")
DataTables("表A").AddNew
--  作者：cbt
--  发布时间：2016/8/3 15:46:00
--  
 For i As Integer = CurrentTable.Rows.Count -1 To 1 Step -1
    CurrentTable.Rows(i).Delete() \'倒删
Next

For i As Integer = 0 To CurrentTable.Cols.Count-1
    CurrentTable.Rows(0)(i)=""  \'清空第一行所有数据
Next