以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请教  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=51305)
--  作者：jswjyjf
--  发布时间：2014/5/23 17:08:00
--  请教

For Each r As Row In Tables("客户库").rows
  r.DataRow.delete
Next

 

这句话 命令窗口测试一下 会发现不会全部删除 每次只能删除一半 什么原因
--  作者：有点甜
--  发布时间：2014/5/23 17:14:00
--  

 这样删除

 

For i As Integer = 0 To Tables("客户库").rows.Count - 1
  Tables("客户库").rows(0).delete
Next

[此贴子已经被作者于2014-5-23 17:14:28编辑过]
--  作者：有点甜
--  发布时间：2014/5/23 17:17:00
--  

 或者这样

 

For i As Integer = Tables("客户库").rows.Count - 1 To 0 Step -1
  Tables("客户库").rows(i).delete
Next

 

 或者这样

 

Tables("客户库").DataTable.DeleteFor(Tables("客户库").Filter)