20070604103030怎么转化成2007-06-04 10:30:30?在线等
20070604103030怎么转化成2007-06-04 10:30:30?在线等
[解决办法]
Dim sj as String
Dim sj1 as String
sj1 = Mid(sj,1,4) & "- " & Mid(sj,5,2) & "- " & Mid(sj,7,2) & " " & Mid(sj,9,2) & ": " & Mid(sj,11,2) & ": " & Mid(sj,13,2)
[解决办法]
Dim sj as String
Dim sj1 as String
sj= "20070604103030 "
sj1 = Mid(sj,1,4) & "- " & Mid(sj,5,2) & "- " & Mid(sj,7,2) & " " & Mid(sj,9,2) & ": " & Mid(sj,11,2) & ": " & Mid(sj,13,2)
sj1就是你要的，调用即可。
[解决办法]
抱歉未将sj赋值，代码修改如下：
Dim sj as String
Dim sj1 as String
sj = “20070604103030”
sj1 = Mid(sj,1,4) & "- " & Mid(sj,5,2) & "- " & Mid(sj,7,2) & " " & Mid(sj,9,2) & ": " & Mid(sj,11,2) & ": " & Mid(sj,13,2)
[解决办法]
dim s as string
s= "20070604103030 "
s=format(s, "####-##-## ##:##:## ")
? s
