主题：请教，日期转换

dim s as string = "2010-4-1 9:01:23",说明分及秒为两位，月日时小于9时不补零。
请教，如何转换成日期格式为“yyyy-MM-dd HH:mm:ss"
谢各位提供简便方法。

这个日期时间哪里来的？直接在初始事件上想办法更简洁！

个人认为：如果是查找字符串或者是集合，那就是错误，列表项目不同，定义列表项目前提应该是具备唯一性。

呵呵，回错帖子了！

如果没有好办法，就这样吧：
dim s as string = "2010-4-1 9:01:23"
dim sg,sg1 as string
sg = s.split(" ")(0)
sg1 = s.split(" ")(1)
for i as integer = 0 to sg.split("-").length-1
    if sg.split("-")(i).length = 1
        sg=sg.replace(sg.split("-")(i),"0" & sg.split("-")(i))
    end if
    if i > 0
        if sg1.split(":")(i).length = 1
            sg1=sg1.replace(sg1.split(":")(i),"0" & sg1.split(":")(i))
        end if
    end if
next
output.show(sg & " " & sg1)   '结果 20010-04-01 9:01:23  就是太繁琐了些。

如果在初始生成这个日期时间的时候想办法，会更简单。

按目前的需求，也可以这样：

dim s as string = "2010-4-1 9:01:23"
dim Values() as String
dim Value1s() as String
Values = s.split(" ")
Value1s = Values(0).split("-")
dim dt as date = "#" & Value1s(1) & "/" & Value1s(2) & "/" & Value1s(0) & " " & Values(1) & "#"
Output.show(format(dt,"yyyy-M-d hh:mm:ss"))

当日、月也需要补位时，改这里即可：

Output.show(format(dt,"yyyy-MM-dd hh:mm:ss"))

dim s as date = "2010-4-1 9:01:23"       '这个有不对吗？
Output.show(format(s,"yyyy-MM-dd h:mm:ss"))  

没人说不对？
因为format对“-”不识别，导致我误以为时间格式不对。

有个问题:
dim s as date = "#4/1/2010 0:1:3#"   
Output.show(format(s,"yyyy-MM-dd h:mm:ss"))
结果怎会:2010-04-01 12:01:03  为何不按照24小时制式呢?