以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  怎么样只删除当前行的数据  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=86515)
--  作者：jinzhengbe
--  发布时间：2016/6/19 13:40:00
--  怎么样只删除当前行的数据
Dim Result As DialogResult
result = MessageBox.Show("真的删除该记录吗?", "删除", MessageBoxButtons.OKCancel, MessageBoxIcon.Warning)
If Result = DialogResult.OK
With Tables("weixindanhao.weixin")
For i As Integer = .BottomPosition To .TopPosition Step -1
        .Rows(i).Delete()
    Next
 End With   

End If


上面的代码，执行后，会删除所有数据
怎么改才能只删除当前行的数据呢？
--  作者：wyz20130512
--  发布时间：2016/6/19 17:33:00
--  

Dim Result As DialogResult
result = MessageBox.Show("真的删除该记录吗?", "删除", MessageBoxButtons.OKCancel, MessageBoxIcon.Warning)
If Result = DialogResult.OK
With Tables("weixindanhao.weixin")
.Current.Delete()
  End With   

End If
--  作者：狐狸爸爸
--  发布时间：2016/6/19 22:02:00
--  

强烈建议楼主去看一遍帮助文件，已经4年了，你不是新手了。

 
--  作者：jinzhengbe
--  发布时间：2016/6/20 9:53:00
--  
谢谢，狐狸爸爸，帮助当然看，找不到就得麻烦各位仁兄了。
--  作者：大红袍
--  发布时间：2016/6/20 9:56:00
--  
看2楼，学了四年，最基本的东西都还没搞懂。
--  作者：jinzhengbe
--  发布时间：2016/6/20 9:57:00
--  
不好意思啊，
可能是我理解错了，不是当前选定，是当前所在的行
--  作者：大红袍
--  发布时间：2016/6/20 9:59:00
--  
看2楼啊