日期/时间格式VBA访问查询

Question

我是 Access 新手，下面有一个代码，应该通过我电脑中的当前日期减去 1 小时将当前月份插入表中：

strSQL = "INSERT INTO [mytable] ([monthColumn]) "
strSQL = strSQL & "VALUES ("
strSQL = strSQL & "#" & Format(Now - (1 / 24), "mmmm") & "#"
strSQL = strSQL & ");"

DoCmd.SetWarnings False
DoCmd.RunSQL (strSQL)
DoCmd.SetWarnings True

我也尝试过这个：

strSQL = "INSERT INTO [mytable] ([monthColumn]) VALUES (#" & Format(Now - (1 / 24), "mmmm") & "#);"

DoCmd.SetWarnings False
DoCmd.RunSQL (strSQL)
DoCmd.SetWarnings True

对于这两个代码，我收到此错误：

我仅从下面的工作代码派生出上面的代码：

strSQL = "INSERT INTO [mytable] ([monthColumn]) VALUES (#" & Now() & "#);"

可能缺少什么？预先感谢。

Answer 1

“日期”数据类型列包含有效日期及其组成部分：“日”、“月”和“年”。 月份名称不是有效日期，它只是“文本”。您不能在日期列中仅存储文本（即使它是月份名称的缩写）。将其存储在类型为：text 的列中。