请教各位一个艰难的问题
我希望将类似19900805这样的日期自动保存为1990-08-05的形式
可是找了很多函数比如Cdata，format等都不行，我不知道是否有其他的函数
我的程序如下：

VB code

Public Const x = "20091224"Public Function wode(x)    Dim a '因为我不知道Isdata()函数参数必须要用什么样的类型，所以没有规定    Dim b    Dim c    Dim sql    a = Mid(x, 1, 4)    b = Mid(x, 5, 2)    c = Mid(x, 7, 2)    sql = "#" & b & "/" & c & "/" & a & "#"    MsgBox sj    If IsDate(sj) = True Then        MsgBox "ok"    Else        MsgBox "no"    End IfEnd Function

程序运行完后Isdata的结果总是返回FALSE，我不知道哪错了？
还有，有什么更好的方法直接将类似19900805这样的日期自动保存为1990-08-05的形式？请大侠们指明？不胜感激！
还有就是#08/05/1999#在VB中输入后直接变成了#8/5/1999#，这样ISDATA（）函数就运行成功了

[解决办法]
Debug.Print Format("20111122", "####-##-##")
[解决办法]
用Format，可以百度一下 VB Format，查一下具体的使用方法。会有收获的。