Controlli - Inserire A Run-time I 12 Mesi Dell'anno In Una ComboBox

Combo # Dim Width As Integer
Dim Height As Integer
Width = Screen.Width \ App.TwipsPerPixelX
For i = 1 To 12
combo1.AddItem Format("28/" & i & "/1997", "mmmm")
Next