Access 和暦変換

本日の日付を和暦変換。

Dim nowdate1 As String
nowdate1 = Format$(now, "gee年mm月dd日")  ' H00年00月00日
Dim nowdate2 As String
nowdate2 = Format$(now, "gggee年mm月dd日")' 平成00年月00日