ComboBox3 de item olarak 1,2,3,4,5,6,7,8,9,10,11,12 ekli

Benim istediğim form açılışında (yani loadına) nasıl bir kod yazmalıyımki

Bulunduğumuz ay "Ocak" İse "12" , "Şubat" ise "1", "Mart" ise "2" vs..vs..vs.. seçli gelsin

Yani bulunduğumuz ayın bir alt rakamını seçecek.

Teşekkürler

listindex özelliğini kullanırsan istedigini alırsın.
Private Sub Form_Load()
If Month(Date) > 1 Then
Combo1.ListIndex = Month(Date) - 2
Else
Combo1.ListIndex = 11
End If
End Sub

(16/01/2012, 13:44)mcmaho yazdı: listindex özelliğini kullanırsan istedigini alırsın.
Private Sub Form_Load()
If Month(Date) > 1 Then
Combo1.ListIndex = Month(Date) - 2
Else
Combo1.ListIndex = 11
End If
End Sub

Vb 2010 da hata veriyor bu kod

bu kodları örnek olarak verdim. bu kodlar vb 6 için. combo nesnesinin listindex özelliğini kullanacaksın.vb 2010 a göre ayarla kodları.

(16/01/2012, 17:34)mcmaho yazdı: bu kodları örnek olarak verdim. bu kodlar vb 6 için. combo nesnesinin listindex özelliğini kullanacaksın.vb 2010 a göre ayarla kodları.

If Now.Month >= 2 Then ComboBox1.Text = Now.Month - 1
If Now.Month = 1 Then ComboBox1.Text = 12
Böyle çözdüm