如何转换成日期格式？

Question

使用Access 2003

Date Column数据类型是文本

表1

日期

20090528
20090529
20090530
20090502
20090504

预期产出

28-May-2009
29-May-2009
30-May-2009
02-May-2009
04-May-2009

...

如何查询预期输出日期格式？

Answer 1

作为VBA代码 - 您可以将其包装为函数

Dim strMyDate As String
Dim dteDate As Date

strDate = "20090528"
dteDate = DateSerial(Left(strDate, 4), Mid(strDate, 5, 2), Right(strDate, 2))
MyStr = Format(dteDate, "dd-mmm-yyyy")
Debug.Print MyStr

作为表格中的数据类型 - 如果将数据附加到字段为日期/时间格式的表格中，则可以在表格/表格上​​指定格式，即在输出时间。

Answer 2

我发现Cdate对我不起作用。

Format(DateSerial(Left(Field1, 4), Mid(Field1, 2, 2), Right(Field1, 2)), "dd-mmm-yyyy")

Answer 3

CDate应该做你想做的......