Bunun mantığı bence yıl bazında aradaki farkı hesaplamak. Bunun için ise DateDiff yeterli...
Örnek:
Private Sub Komut0_Click()
Dim Tarih As Date
Dim Mesaj As String
Tarih = "14.11.1981"
Mesaj = DateDiff("yyyy", Tarih, Now)
MsgBox "Aradaki fark şu kadar yıldır:" & Mesaj
End Sub
Açıklama: http://office.microsoft.com/tr-tr/access...11055.aspx
Tarihten tarih çıkartmak
Bu Konudaki Yorumlar |
Tarihten tarih çıkartmak - Yazar: danke - 30/05/2009, 20:12
Cvp: Tarihten tarih çıkartmak - Yazar: mesudi - 30/05/2009, 20:21
Cvp: Tarihten tarih çıkartmak - Yazar: tdsharun - 30/05/2009, 21:16
Cvp: Tarihten tarih çıkartmak - Yazar: adnanyurdakul - 31/05/2009, 11:46
Cvp: Tarihten tarih çıkartmak - Yazar: tdsharun - 01/06/2009, 23:57
Cvp: Tarihten tarih çıkartmak - Yazar: danke - 02/06/2009, 22:28
Cvp: Tarihten tarih çıkartmak - Yazar: tdsharun - 02/06/2009, 23:26
Cvp: Tarihten tarih çıkartmak - Yazar: danke - 03/06/2009, 01:56
Cvp: Tarihten tarih çıkartmak - Yazar: tdsharun - 03/06/2009, 10:43
Cvp: Tarihten tarih çıkartmak - Yazar: danke - 03/06/2009, 23:42
|
Konuyu Okuyanlar: 1 Ziyaretçi