在MS Access中使用ISO 8601日期

Question

  

Q1

是否有一种方法可以在MS Access中处理ISO 8601日期。我需要能够使用日期： 2010-05-31T06：00：00在VBA代码中。此外，我需要能够采取5/31/10上午6:00，并采用其他格式

  

Q2

我正在保存日期＆amp; NoSQL数据库中的时间（例如Firebase），也将检索数据和时间戳。因此需要一种在Access数据和数据之间来回转换的功能。时间数据类型和ISO 8601日期。

Answer 1

创建一个模块并粘贴以下代码。然后可以在任何Forms / Modules

中调用这些函数

'ISO to Access
Public Function DtIsoToAccess(myisodate as String) as date
DtIsotoaccess=cdate(Replace(myisodate, "T"," "))
End function

'Access to ISO
Public Function DtAccessToIso(myaccdate as Date) as string
DtAccessToIso= format(myaccdate, "yyyy-mm-dd\Thh:nn:ss")
End function