syn huseyin arslan;
sürekli güncel olmasını istiyorum demişsin zaten öyle sen bugunun
tarihine göre örnek üzerinde çalıştığın için sürekli sonuçlar 30-90-180-360 şeklinde değişecektir zaten.yani standart kaldığı felan yok.Denemek için sistem
tarihini ileri bi tarihe al ve programını yeniden çalıştır bak bakalım aynı mı kalacak.Değiştiğini göreceksin.Eğer bugunün
tarihine göre işlem yaptıracaksan 1-3-6-12 ay şeklindeki periyotlara göre neden hesaplatıyorsun.18.02.2013
tarihinden bitiş
tarihini çıkartmasını istiyorsan eğer anladığım kadarıyla girilen bir kaydın üye kayıt
tarihini manuel elle değiştireceksen uye başlangıç
tarihi kutusunun güncelleştirme sonrası olayına;
Select Case uyelikpaketi.ListIndex
Case 0
Me.Metin91.Value = Me.uyebaslangictarihi + 30
Case 1
Me.Metin91.Value = Me.uyebaslangictarihi + 90
Case 2
Me.Metin91.Value = Me.uyebaslangictarihi + 180
Case 3
Me.Metin91.Value = Me.uyebaslangictarihi + 365
End Select
bu kodu yazman yeterli olacaktır.Ama benim anlamadığım üyenin "üyebaşlangıç
tarihi" değişmez.Üyelik biter ve yeniden aktifleştirme yoluna gidersin.Bu şekilde yapmak istersende uygulamanın yapısını değiştirmemiz gerekir.
GERİ SAYIM;Sen doğduğunda başladı ! Eğer (9) canlı bile olsaydın en fazla (8) kez kaçabilirdin Ölümden ! Bil ki (7) Düvele sultan dahi olsan yerin (6) Mekan olacak sana. En fazla (5) Metre kumaş götürebileceksin ! Kapatacaksın (4) açsanda gözlerini ! Bu (3) günlük fani dünyada Azraile (2) kat olup yalvarsanda nafile EceL geldiğinde (1) gün öleceksin ! İşte, o an herşey (0) dan başlayacak. Çünkü,
ÖLÜM BİR YOK OLUŞ DEĞİL,YENİDEN DOĞUŞTUR !