关于For Next 及上一行的问题,为什么这样的代码不行呢? Post By:2011/1/27 14:47:00 [只看该作者]
设定一个这样的表,
然后
第四列的代码
DataColChanged
If e.DataCol.Name = "第四列" Then Dim drs As List(Of DataRow) = e.DataTable.Select("[_SortKey] > -1", "[_SortKey]") For n As Integer = 0 To drs.Count - 1 '遍历所有行 If drs(n).Isnull("第一列") Then drs(n)("第一列") = drs(n-1)("第一列") Else Return End If Next End If