ComboBox'ta yazdığım yıl'a göre Şubat Ayı kaç çekiyor?

[Orion1]

Merhabalar.
ComboBox'ta Yazdığım Yıl'a göre Şubat ayı kaç gün çekiyor.
Örnek :
ComboBox'ta 2008 şeklinde yazıyor.
Bu durumda 2008 yılında şubat ayı 'nı kaç gün çektiğini gösteren Bir makro oluşturmak istiyorum.
Teşekkür ederim.
:hey:

 

[Haluk]

Uyarlayınız...

Sub Test()
    Dim x As Double
    Dim y As Date, z As Date
    Dim RetVal As Integer
    x = 2008
    y = "01.03." & x
    z = y - 1
    RetVal = Day(z)
    MsgBox RetVal
End Sub

 

[Orion1]

Sn:Haluk Hocam teşekkür ederim.
İyi çalışmalar.
:hey: