以文本方式查看主题

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

--  作者:一辈子只做一件事
--  发布时间:2014/8/29 15:22:00
--  关于删除行

Dim t As Integer
For t = 0 To Tables("HDS").Rows.count - 1
Tables("HDS").Rows(t)("BH") = t
Next

请问老师,我的这段代码放在Datarowdeleted里,位什么删除一行时执行,删除多行时就不执行了呢?如果要删除多行,如何让代码执行呢?

[此贴子已经被作者于2014-8-29 15:27:43编辑过]

--  作者:有点甜
--  发布时间:2014/8/29 15:29:00
--  

Dim i As Integer = 0

For Each dr As DataRow In e.DataTable.DataRows
    dr("第一列") = i
    i += 1
Next


--  作者:一辈子只做一件事
--  发布时间:2014/8/29 15:37:00
--  

Dim i As Integer = 0

For Each dr As DataRow In e.DataTable.DataRows
    dr("第一列") = i
    i += 1
Next

我试了,确实好用,可就是看到 i += 1,我还以为是错误编码呢