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
#5
