子表最后一行数据 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 子表最后一行数据

共有1864人关注过本帖树形打印复制链接主题：子表最后一行数据

有点色

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/2/12 15:53:00 [显示全部帖子]

Dim dr As DataRow = e.DataRow.getparentrow("报告台账")
Dim drs As List(Of DataRow) = dr.getchildrows("报告流水")
Dim str As String = Nothing
For i As Integer = drs.count-1 To 0 Step -1
    If drs(i)("_Identify") <> e.DataRow("_Identify") Then
        str = drs(i)("处理")
        Exit For
    End If
Next
dr("处理情况") = str

有点色

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/2/13 9:27:00 [显示全部帖子]

以下是引用txtxtttt1919在2017/2/13 9:24:00的发言：
代码很好用，谢谢，但为什么要这么写，我写那个的问题是什么？

因为当前行没有删除，不知道最后一行是哪一个，因为有可能是当前行，也可能是最大的那一行。

所以要从后面开始循环，判断哪个是最后一行。

下一主题 >> << 上一主题

主题：子表最后一行数据