以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  删除行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=61927)

--  作者:sara
--  发布时间:2014/12/22 15:46:00
--  删除行
如何实现删除当前行?就是当前选中De行?
--  作者:jialihaha
--  发布时间:2014/12/22 15:47:00
--  
Tables("表名").Current.Delete
--  作者:有点甜
--  发布时间:2014/12/22 15:48:00
--  
 For i As Integer = CurrentTable.BottomPosition To CurrentTable.TopPosition Step -1
    CurrentTable.Rows(i).Delete
Next

--  作者:sara
--  发布时间:2014/12/22 15:53:00
--  
这种办法一直删除De是第一条记录
--  作者:sara
--  发布时间:2014/12/22 15:53:00
--  
这个是删除所有数据吧,我想实现De是删除当前行数据,就是选择哪行删除哪行
--  作者:jialihaha
--  发布时间:2014/12/22 15:53:00
--  
那就看3楼的,循环删除
--  作者:有点甜
--  发布时间:2014/12/22 15:54:00
--  
看3楼。
--  作者:sara
--  发布时间:2014/12/22 16:05:00
--  
确实管用啊,解释下呗?或者参考位置
--  作者:有点甜
--  发布时间:2014/12/22 16:06:00
--  

http://www.foxtable.com/help/topics/1597.htm

 


--  作者:一笑
--  发布时间:2015/1/6 16:14:00
--  
我想删除窗口中绑定表(可编辑)中所有行,结果只能删除单行,请教专家代码有何问题?谢谢
With Tables("时间")
If MessageBox.Show("是否全部删除吗?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes
     For i As Integer = .BottomPosition To .TopPosition Step -1
    .Rows(i).Delete
Next
        End If
End With