(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