Foxtable(狐表) → 用户栏目 → 专家坐堂 → 高效流水账行不通！！！！


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

主题：高效流水账行不通！！！！
帅哥哟，离线，有人找我吗？
zhangzhenghua
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：1 积分：70 威望：0 精华：0 注册：2016/2/20 6:37:00 		高效流水账行不通！！！！  发帖心情 Post By：2016/2/20 7:47:00 [只看该作者]

FOXTABLE很不错图片点击可在新窗口打开查看！0基础学了10天感觉已经受益匪浅！
发现高效流水账中的"支出""收入"只能是数据列
才能用，有图图片点击可在新窗口打开查看可惜我"支出""收入"都是经历了N次表达式列！
图片点击可在新窗口打开查看跪求大仙怎样将表达式列转换（“或引用“）为数据列！
鄙人将感激不尽！！！！
[此贴子已经被作者于2016/2/20 7:49:27编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
Hyphen
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐神 帖子：5015 积分：25363 威望：0 精华：0 注册：2015/8/18 9:21:00 		  发帖心情 Post By：2016/2/20 8:34:00 [只看该作者]

表达式列，这里改改：Case "收入","支出"

"收入"和"支出" 改为表达式列引用到的数据列即可
 回到顶部
帅哥哟，离线，有人找我吗？
Hyphen
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐神 帖子：5015 积分：25363 威望：0 精华：0 注册：2015/8/18 9:21:00 		  发帖心情 Post By：2016/2/20 8:34:00 [只看该作者]


 回到顶部
帅哥哟，离线，有人找我吗？
xtghdwxf86
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：16 积分：246 威望：0 精华：0 注册：2016/2/3 22:34:00 		哎，，，无人问津！！！！自己沙发下  发帖心情 Post By：2016/2/23 22:50:00 [只看该作者]

图片点击可在新窗口打开查看图片点击可在新窗口打开查看图片点击可在新窗口打开查看图片点击可在新窗口打开查看图片点击可在新窗口打开查看图片点击可在新窗口打开查看

 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2016/2/23 22:52:00 [只看该作者]

 上传具体的例子说明问题。

 

 如果你的表达式列是经过多个表后才得到的话，就去对应的表的datacolchanged事件编写代码。
 回到顶部
帅哥哟，离线，有人找我吗？
xtghdwxf86
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：16 积分：246 威望：0 精华：0 注册：2016/2/3 22:34:00 		  发帖心情 Post By：2016/2/23 22:58:00 [只看该作者]

谢谢！先试试看！图片点击可在新窗口打开查看

 回到顶部
帅哥哟，离线，有人找我吗？
xtghdwxf86
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：16 积分：246 威望：0 精华：0 注册：2016/2/3 22:34:00 		  发帖心情 Post By：2016/2/23 23:07:00 [只看该作者]

Select Case e.DataCol.Name
    Case "收入","支出"
        Dim dr As DataRow
        Dim drs As List(of DataRow)
        dr = e.DataTable.Find("[_SortKey] < " & e.DataRow("_SortKey"), "[_SortKey] Desc") '找出上一行
        If dr Is Nothing Then '如果没有找到上一行,说明本行就是第一行
            e.DataRow("余额") = e.DataRow("收入") - e.DataRow("支出")
            dr = e.DataRow
        End If
        drs = e.DataTable.Select("[_SortKey] >= " & dr("_SortKey"), "[_SortKey]")
        For i As Integer = 1 To drs.Count - 1 '重算余下行的余额
            drs(i)("余额") = drs(i-1)("余额") + drs(i)("收入") - drs(i)("支出")
        Next    
End Select
     
 回到顶部
帅哥哟，离线，有人找我吗？
xtghdwxf86
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：16 积分：246 威望：0 精华：0 注册：2016/2/3 22:34:00 		  发帖心情 Post By：2016/2/23 23:08:00 [只看该作者]

这里的"收入""支出"怎样转为数据列？ 谢谢~~~~~

 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2016/2/23 23:47:00 [只看该作者]

 不能转为数据列。去表达式生成对应的表的datacolchanged事件写代码。

 

 比如 收入 = 子表的合计，那么修改子表某列的时候，就重新计算父表的值。
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04102 秒, 4 次数据查询