Crystal Report函数用于将Seconds转换为Timespan格式

Question

我有一份水晶报告，用饼图显示代理人全天的活动。在详细信息部分显示：

• 活动[string]
• 已启动[DateTime]
• EndedAt [DateTime]
• 持续时间[EndedAt和StartedAt之间的差异，以秒为单位 - 整数]

报告数据是GroupedBy活动，并按持续时间汇总。

目前持续时间以秒显示，但我需要格式化它02h：30m：22s：15ms。为此，我在Formula Workshop编辑器中的Crystal Report中编写了一个自定义函数，如下所示，但看起来语法不正确（关键字Long上的错误消息：“缺少变量类型（例如，'String'）。” ）。有人可以帮忙吗？

Function GetTimeSpanString(seconds as Long)
    Dim ts As TimeSpan = TimeSpan.FromSeconds( seconds );
    GetTimeSpan = string.Format("{0:D2}h:{1:D2}m:{2:D2}s:{3:D3}ms",  
                            ts.Hours,  
                            ts.Minutes,  
                            ts.Seconds,  
                            ts.Milliseconds) 
End Function

Answer 1

您可以轻松更改我的ElapsedTime()功能以满足您的需求。