Function Crystal Report函数，用于将秒转换为Timespan格式

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

• 活动[字符串]
• 开始时间[日期时间]
• EndedAt[日期时间]
• 持续时间[EndedAt和StartedAt之间的差值（秒）-整数]

报表数据按活动分组，按持续时间汇总

当前持续时间以秒为单位显示，但我需要将其格式化为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

你可以很容易地改变我的功能来满足你的需要