以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]第二列值等于第一列上一行的值  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=179567)

--  作者:miaoqingqing
--  发布时间:2022/8/30 9:33:00
--  [求助]第二列值等于第一列上一行的值
[求助]第二列值等于第一列上一行的值

比如:表A
第一列  第二列
           
中           
              中 

想实现上面功能求助下面代码修改

Dim t As Table = Tables("表A")
For i As Integer = 0 To t.Rows.Count -1
    If i > 1 Then
        t.Rows(i)("第二列") = t.Rows(i-1)("第一列")
        Exit For
    End If
Next


--  作者:有点蓝
--  发布时间:2022/8/30 9:44:00
--  
去掉Exit For