コンボボックスで選択した月によって、日数を反映

Question

前提・実現したいこと

コンボボックスで選択した月によって、その月に含まれる日数が、該当の場所（写真では青い場所）に、縦に一覧で表示されるようにしたいです。
エラーが出ない、サンプルコードを、ご提示頂ければ幸いです。

発生している問題・エラーメッセージ

エラーメッセージ

該当のソースコード

ソースコード

試したこと

ここに問題に対して試したことを記載してください。

補足情報（FW/ツールのバージョンなど）

ここにより詳細な情報を記載してください。

Answer 1

残念ながら、ここではコード作成依頼は受け付けておりません。

まずはあなたなりにコードを書いてみましょう。
そのうえで、わからないことがあればそのコードとともに聞いていただければお答えできるかと思います

Comments

[hirame-hirame]

Private Sub subInitiarizeCmb年月()
Dim dateNow As DateTime = DateTime.Now
Dim dt As Object = Nothing

'要素追加
cmb年月.Items.Add("")

For i As Integer = 0 To 3
cmb年月.Items.Add(dateNow.AddMonths(-i).ToString("yyyy年MM月"))
Next
End Sub

Sub getTargetDays()
For month As Integer = 1 To 12
' 2021年1月〜12月の各月の日数を求める
Console.WriteLine("2021-{0} : {1}days", month, DateTime.DaysInMonth(2021, month))
Next
End Sub

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
subInitiarizeCmb年月()
End Sub

この続きとなる、コードが思いつきません。
少しだけでも、お力添え頂けませんか…？