Difference of dates in years

From	"Helge Haensel" <dj1wm@nurfuerspam.de>
Newsgroups	comp.lang.basic.misc
Subject	Difference of dates in years
Date	2012-05-18 17:23 +0200
Organization	albasani.net
Message-ID	<op.weifpkbrsjedh2@w7-pc> (permalink)

Show all headers | View raw

Hallo NG!
I am still using VB5E under W7/64. It works within limits.
I calculate a difference in years by:

Dim j as Long, Dim OtherDate as String
j = CLng(Date - (CDate(OtherDate))) / 365

This works so far but surely isn't correct in all cases due to Feb 29.
Do you know a correct calculation?
Thanks!

Vy 73! Helge
-- 
Helge, DJ1WM

Back to comp.lang.basic.misc | Previous | Next — Next in thread | Find similar

Thread

Difference of dates in years "Helge Haensel" <dj1wm@nurfuerspam.de> - 2012-05-18 17:23 +0200
  Re: Difference of dates in years ralph <nt_consulting64@yahoo.com> - 2012-05-18 11:30 -0500
    Re: Difference of dates in years Todd Vargo <tlvargo@sbcglobal.netz> - 2012-05-18 18:38 -0400
    Re: Difference of dates in years "Helge Haensel" <dj1wm@nurfuerspam.de> - 2012-05-19 10:17 +0200

csiph-web