关于日期格式？？
现在有个日期值 2010.04.20 0:31:47 需要转换成 1004200031

再由 1004200031 转换成 2010.04.20 00:31

再从 2010.04.20 00:31 的基础上 加 29分钟 公式怎么写呀

不编函数的话，有简单的解决方法吗？？



[解决办法]
编一个函数处理是最简单的了。

用到 format() mid()函数 DateTime类型
[解决办法]

VB code

dim a as stringa="2010.04.20 0:31:47"msgbox dateadd("n",29,format(a,"YYYY-MM-DD HH:MM")
[解决办法]
VB code
dim a as stringa="2010.04.20 0:31:47"msgbox dateadd("n",29,format(a,"YYYY-MM-DD HH:MM"))
[解决办法]
format(replace("2010.04.20 0:31:47", ".", "/") ,"yyMMddhhmm")
[解决办法]
VB code
Dim s As StringDim dt As Dates = "1004200031"dt = DateSerial(Left$(s, 2), Mid$(s, 3, 2), Mid$(s, 5, 2)) _   + TimeSerial(Mid$(s, 7, 2), Mid$(s, 9, 2), 0)Debug.Print Format$(dt, "yyyy.mm.dd hh:mm")
[解决办法]
探讨

引用:

晕死了 搞了一个星期的日期转换了。上边的问题基本解决了。是我写的函数的问题。
哪位大哥能给解决下由 1004200031 转换成 2010.04.20 00:31 这个问题呀？

先谢谢Leftie,patrickkong两位老兄了。


建议直接用mid函数拆分开字符串再组合：）