关于format的问题!
要求时间可以显示
例如1234:45:07的时间格式!
我用HH:mm:ss只能显示24小时制!
如何解决!
问题点数：0、回复次数：7Top
1 楼northwolves（狼行天下）回复于 2003-09-04 00:07:08 得分 0
秒数\3600 : (秒数 MOD 3600 ) \60 : 秒数 MOD 60Top
2 楼ywpg（）回复于 2003-09-04 00:08:49 得分 0
同意Top
3 楼moleboy（薄荷糖）回复于 2003-09-04 09:31:43 得分 0
upTop
4 楼ueseu（一哥）回复于 2003-09-04 09:56:15 得分 0
goodTop
5 楼yijiansong（不知路在何方）回复于 2003-09-04 10:01:57 得分 0
用 format 函数Top
6 楼moleboy（薄荷糖）回复于 2003-09-04 11:09:22 得分 0
format函数提供的时间显示函数不支持大于24小时制!
HH:mm:ssTop
7 楼northwolves（狼行天下）回复于 2003-09-04 15:15:45 得分 0
可以写个函数解决：
Private Sub Command1_Click()
MsgBox timeformat(5000000)
End Sub
Function timeformat(ByVal seconds As Long) As String
timeformat = TimeSerial(0, 0, seconds Mod 3600)
timeformat = Right(timeformat, (Len(timeformat) - 1))
timeformat = seconds \ 3600 & timeformat
End FunctionTop
