在有效日期呼叫月份时键入不匹配

Question

我在使用月份和年份功能处理Access 2010处理日期时遇到问题。奇怪的是，日间功能有效......

?Day(#12/25/2014#)
 25 
?Month(#12/25/2014#)
 error
?Year(#12/25/2014#)
 error

我得到的错误是运行时错误＆＃39; 13＆＃39; / 类型不匹配。帮助诊断他的根本原因或解决方案将不胜感激。

Answer 1

我怀疑您的代码中已经重新定义了月份和年份。

尝试在调试窗口中输入7个字符?month(而不按Enter键，然后查看IntelliSense提示弹出的内容。

如果它显示Month(Date)那么一切正常。

如果它显示Local Month As Variant之类的内容，那么这就是您需要解决的问题。

此代码会重现您的问题，并显示相同的错误消息：

    Public Sub MonthFail()
    Dim Month, x
    x = Month(#12/25/2014#)
    End Sub