ms-access - MS Access 2003/2007 VBA - 如何从记录集中获取日期字段并将 dd-MMM-yyyy 格式字符串化？

Question

我有一些使用 DAO 获取一些数据的 VB，其中一个字段是日期字段(如交易日期)。它不是日期/时间，只是像 dd/mm/yyyy 这样的简单日期。

所以在 Access 表单上我知道如何做到这一点，但现在我正在研究一些 excel/ppt 自动化。我使用类似这个简单示例的 DAO sql 字符串、openrecordset 来获取数据。

所以假设有问题的数据只是 rs!Date。

我像这样将它移动到 powerpoint:

Set oShape = oSlide.Shapes("S1_Date")
Set oTextRange = oShape.textFrame.TextRange

     oTextRange.Text = rs!Date

现在我遗漏了各种东西，但这是将我已经在记录集中的这个日期转移到 ppt pres 上的部分，只是以这种格式

dd/mm/yyyy

我真的很想知道如何简单地得到这个

"dd-MMM-yyyy"

作为我想要的输出字符串。

谢谢贾斯汀

Answer 1

也许:

oTextRange.Text = Format(rs![Date], "dd-MMM-yyyy")

我将字段名称括在方括号中，因为 Date 是保留字。但我认为在这种情况下应该没有任何区别。尽管如此，请尽量避免为您的字段、表和其他对象名称保留字。