以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于统计的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=25536)

--  作者:ramen
--  发布时间:2012/11/11 15:39:00
--  关于统计的问题
请教一下,
     在表事件里面我有两组代码:
      一组是用来统计连续天数的,用结束时间-开始时间+1=合计
      另一组是用来统计不连续天数的,在备注列输入7.1(代表7月1日)、8.2,中间用“,”隔开,合计会自动统计天数
现在遇到的问题是两组代码都分别执行,合计不会自动累加,我想它们都统计在合计列。
     不知道怎么弄呢?请高手指点!!
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:天数计算.table


--  作者:sgs
--  发布时间:2012/11/11 15:57:00
--  
Dim m,n As Integer
Select Case e.DataCol.name
    Case "备注","开始日期", "结束时间"
        If e.DataRow.isnull("备注") = false Then
            m = e.DataRow("备注").split(",").Length
        End If
        If e.DataRow.IsNull("开始日期") = False AndAlso e.DataRow.IsNull("结束时间") = False
            n =  DateDiff("d",e.DataRow("开始日期"),e.DataRow("结束时间")) + 1
        End If
        e.DataRow("合计") = m + n
End Select
[此贴子已经被作者于2012-11-11 15:58:26编辑过]

--  作者:ramen
--  发布时间:2012/11/11 16:10:00
--  
原来如此,谢谢你!


--  作者:zcw728909
--  发布时间:2012/11/11 18:03:00
--  
学习了