以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何将列中数字转换为时间格式时分秒（12:00:00）  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=147808)
--  作者：xblxbl
--  发布时间：2020/3/24 16:27:00
--  如何将列中数字转换为时间格式时分秒（12:00:00）
请教一个问题，如题。谢谢！
图片点击可在新窗口打开查看此主题相关图片如下：时间格式.jpg
图片点击可在新窗口打开查看
--  作者：有点蓝
--  发布时间：2020/3/24 16:32:00
--  
比如

Dim i As Integer = 104822
Dim s As String = i
Dim d As Date = new Date(1,1,1,cint(s.substring(0,2)),cint(s.substring(2,2)),cint(s.substring(4,2)))
Output.Show(d)
--  作者：xblxbl
--  发布时间：2020/3/24 17:41:00
--  
谢谢老师！