Dim AuswahlZeit As Date
 
        For I = 1 To -24 Step -1
            AuswahlZeit = DateAdd(DateInterval.Month, I, Now)
            cmb_Monatsauswahl.Items.Add(AuswahlZeit.ToString("MMMM , yyyy"))
        Next