ms-access - DateValue の失敗

Question

MS Access VBADateValue関数に奇妙な問題があります。値「2012 年 5 月 4 日」を渡すと、タイプの不一致エラーで失敗します。

内部の日付形式が原因だと思いますが、コードレベルでその形式を変更する方法がわかりません!

現時点で私の解決策は次のとおりです。

 Public Function DateToStr(Value)

   Dim Parts As Variant   Parts = Split(Value, " ")
      Dim Month As String
      Select Case Parts(1)
     Case "Jan"
         Month = "Gen"
     Case "May"
         Month = "Mag"
     Case "Jun"
         Month = "Giu"
    Case "Jul"
         Month = "Lug"
     Case "Aug"
         Month = "Ago"
     Case "Sep"
         Month = "Set"
     Case "Oct"
         Month = "Ott"
     Case "Dec"
         Month = "Dic"
     Case Else
         Month = Parts(1)   End Select
      DateToStr = CDate(Parts(0) & "/" & Month & "/" & Parts(2))

 End Function

心当たりありますか?!?

PS:私の環境はイタリア語です。