Foxtable(狐表)用户栏目专家坐堂 → 流水账


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

主题:流水账

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:112382 积分:572178 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/8/26 9:17:00 [显示全部帖子]

把筛选条件加进来

Select Case e.DataCol.Name
    Case "收入_金额","支出_金额"
        Dim dr As DataRow
dim filter as string
if tables("xx表").filter > "" then
filter = " and " & tables("xx表").filter 
end if
        Dim drs As List(of DataRow)
        dr = e.DataTable.Find("[_SortKey] < " & e.DataRow("_SortKey")filter , "[_SortKey] Desc") '找出上一行

 回到顶部