回答:
同じことを2回行っています。
DateAdd仕事をしたい日付を与えています-今日1か月前の日付。このMonth関数は、その日付から月を抽出します-現在は10です。
FORMAT関数は、その後取ってその月の 10 - -と完全な日付として解釈、すなわち1月10日1900は、これはあなただけの月表示するように書式設定しているものです。
MONTHまたはを削除する必要がありますFORMAT。これらのいずれかが動作するはずです:
strMonthNo = Format(DateAdd("m", -1, Date))
strMonthNo = Month(DateAdd("m", -1, Date))