Merhaba;
Ekteki örnekte Metin kutularına yıl ve ay girdiğimizde sonuç olarak gün sayısını verdirebilirmiyiz.
Saygılarımla
Ayın Gün Sayısını Bulma
Sn Odin;
almak istediğin metin kutusu denetim kaynağına;
metinKutusuAdi = Day(DateSerial(yil_metinkusuadi, ay_metinkutusuadi + 1, 0))
sonuca ulaşabilirisn..
almak istediğin metin kutusu denetim kaynağına;
metinKutusuAdi = Day(DateSerial(yil_metinkusuadi, ay_metinkutusuadi + 1, 0))
sonuca ulaşabilirisn..
İncelermisiniz...
Lütfen olumlu veya olumsuz geri dönüş yapınız...
Lütfen olumlu veya olumsuz geri dönüş yapınız...
Please return your positive or negative ...
POVER hocanın yazdığı kodu Metin kutusunun Exıt olayına yazarsan anında hesaplıyor.
Kod:
Private Sub Yıl_Exit(Cancel As Integer)
Me.txtGUN = Left(DateSerial(Me.Yıl, CInt(Me.AY) + 1, 0), 2)
End Sub
Kod:
Private Sub AY_Change()
Me.txtGUN = Left(DateSerial(Me.Yıl, CInt(Me.AY) + 1, 0), 2)
End Sub
Sn Power;
Teşekkürler istediğim gibi olmuş
Saygılarımla
Teşekkürler istediğim gibi olmuş
Saygılarımla
Konuyu Okuyanlar: 1 Ziyaretçi