Alıntı:nasıl bulacağız 5 - 10 - 15 - 20 ...Örnek için boş bir form açın. Bu forma 4 tane metin kutusu , 1 tane de tuş koyun.
1.metin kutusuna girtar,
2.metin kutusuna terfiyili
3.metin kutusuna terfitarihi
4.metin kutusuna durum
Komut tuşuna da hesapla adını verin.
Sonra hesapla tuşunun click yordamına aşağıdaki kodu yazın.
terfitarihi=DateAdd("yyyy",terfiyili,girtar)
terfitarihi kutusunda yazan tarih bize şahsın terfiyilina yazdığımız sayı kadar yıla göre terfi alacağı tarihi verir.
Sonra aşağıdaki kodu yazarak kalan günü durum kutusuna yazdırırız.hesaplarız.
durum=DateDiff("d",Now,terfitarihi)
