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