[求助]关于时间列的统计（已解决） - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]关于时间列的统计（已解决）

共有9130人关注过本帖树形打印复制链接主题：[求助]关于时间列的统计（已解决）

rpg2813

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

加好友

发短信

等级：童狐帖子：277 积分：2437 威望：0 精华：0 注册：2011/8/28 12:23:00

[求助]关于时间列的统计（已解决） 发帖心情

Post By：2012/4/10 0:50:00 [显示全部帖子]

如题，工作需要，我需要对时间列进行汇总、小计、统计

时间的格式为[hh]:mm

没有秒、年月日的说，23:01+1:59=25:00

现在累计值只能算数字

我的想法是把时间转换成数字?然后汇总时再转换回来？

不知道集体应该如何做？或者更好的方法？

[此贴子已经被作者于2012-4-15 13:33:04编辑过]

rpg2813

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

加好友

发短信

等级：童狐帖子：277 积分：2437 威望：0 精华：0 注册：2011/8/28 12:23:00

Post By：2012/4/13 20:58:00 [显示全部帖子]

以下是引用狐狸爸爸在2012-4-10 9:45:00的发言：

必须先转换为数字，然后统计，得出结果后，将数字转换为时间。

Dim sum As Double
For Each dr As DataRow In DataTables("表A").DataRows
    If dr.IsNull("时间") = False Then
       Dim v As Integer = math.Floor(dr("时间"))
        sum = sum + v * 60 + (dr("时间") - v) * 100
    End If
Next
Dim h As Integer = sum \ 60
Dim m As Integer = sum - h * 60
Return h & ":" & Format(m,"00")

试了代码不行

我现在在表A有一列时间列time格式，我希望第二列为数字列，能把时间列算成分钟数

[此贴子已经被作者于2012-4-13 20:58:29编辑过]