Buton Gizleme ( Tarihe Göre )

Merhaba değerli arkadaşlar;
ekteki uygulamamda şöyle birşey yapmak istiyorum. Programa şifre ile girdikten sonra karşımıza çalışma yılı seçmek için bir forum çıkacak. Bu forum üzerinde iki tane ( 2011 YILI - 2012 YILI ) buton var. Buradaki butonların sistemin tarihine göre görünüp gizlenmesini istiyorum. Yani 2010 yılında giriş yapılıyorsa bu forum üzerinde sadece "2011 YILI" butonu görünecek. 2012 yılına da geçince burada sadece
"2012 YILI" butonu görünmesini istiyorum. Bu mümkün mü acaba.
Herkese başarılar diliyorum.

Sn.Mehmet_Akif Lütfen Site Kurallarını Okuyunuz.Konu Başlığınızı Büyük Harflerle Yazmayınız.

Hocam kusura bakmayın. Biranlık dalgınlığıma gelmiş olmalı. Düzeltmeniz için teşekkürler hocam.

Merhaba,
Butonların isimlerini Komut2011, Komut2012, Komut2013 şeklinde yazınız. Formu tasarım görünümünde açıp tüm butonların "Görünür" ayarını "Hayır" olarak değiştiriniz. Ardından formun geçerli olduğunda olayına aşağıdaki kodu yazınız.

Dim ctrl As Control

Dim t As String

    For Each ctrl In Me.Controls

        t = Format(Date, "yyyy")

            If Format(Date, "yyyy") = t Then

                Controls("Komut" & t).Visible = True

            End If

    Next

sayın sledgeab hocam aşağıdaki hatayı verdi.

Bende bu şekilde bir hata çıkmıyor.