以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  时间转换  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=32380)

--  作者:cks
--  发布时间:2013/5/1 12:02:00
--  时间转换

想让时段值转换成可读性较强的数据,请师傅、师兄指点,,以下为例子:

 

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:项目1.zip

 

想达到的目的

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20130501115606.png
图片点击可在新窗口打开查看


--  作者:qq121454970
--  发布时间:2013/5/1 12:38:00
--  
Dim s As Double =  Tables("表A").Current("第三列") \'您的时段列的值
Dim t As New TimeSpan(0,0,0,s)
Output.Show(t.Days & "天" & t.Hours & "小时" & t.Minutes & "分" & t.Seconds & "秒")

--  作者:cks
--  发布时间:2013/5/1 17:37:00
--  
多谢师兄节日时间都在为我排忧解难,代码正解,多谢!!