Foxtable(狐表)用户栏目专家坐堂 → [求助]第二列当前行等于第一列上一行的值


  共有5448人关注过本帖树形打印复制链接

主题:[求助]第二列当前行等于第一列上一行的值

帅哥哟,离线,有人找我吗?
miaoqingqing
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:660 积分:5180 威望:0 精华:0 注册:2019/7/26 12:54:00
[求助]第二列当前行等于第一列上一行的值  发帖心情 Post By:2023/2/2 17:00:00 [显示全部帖子]

'''''''''
If e.DataCol.Name = "锁定"  Then  
    Dim tt1 As Table = Tables("表A")  'Tables行筛选第二列值会变化,求助第二列值不变(根据datatable行生成)
    For i As Integer = 1 To tt1.Rows.Count - 1  
            If e.DataRow.IsNull("第一列") = False  Then 
                tt1.Rows(i)("第二列") = tt1.Rows(i-1)("第一列")
            Else
                tt1.Rows(i)("第二列") = Nothing
            End If
        End If
    Next
End If



图片点击可在新窗口打开查看此主题相关图片如下:第二列当前行等于第一列上一行的值.png
图片点击可在新窗口打开查看

上图举例,3个红色勾选行后,第二列值变化了不对,求助第二列值不变(根据datatable行生成)
[此贴子已经被作者于2023/2/2 17:01:09编辑过]

 回到顶部