コンボボックスに当月から3ヶ月前まで・・

環境/言語:[環境(Windows2000　）使用言語(VB.NET）]
分類:[.NET]

お世話になります。
ComboBoxで表示はNow()関数で

MoonGet.Text = Format(Now(), "yyyy年MM月")
で表示させているのですが
現在10月を表示していますが、
▼押下で9月と8月も表示させたいのですが、どうしたらいいのか分かりません。
下記に何か追加するのでしょうか？
初心者ですみません｡m(_ _)m
ご存知の方是非教えて下さい。m(_ _)m
宜しくお願い致します。m(_ _)m

MoonGet.Items.AddRange(New Object() {Format(Now(), "yyyy年MM月"), _
Format(Now(), "yyyy年MM月")})

こうさん、こんにちは。

MoonGet.Items.AddRange(New Object() {Format(Now(), "yyyy年MM月"), _
Format(Now().AddMonths(-1), "yyyy年MM月"), _
Format(Now().AddMonths(-2), "yyyy年MM月")})

でどうでしょう？