Path: csiph.com!newsfeed.hal-mli.net!feeder3.hal-mli.net!newsfeed.hal-mli.net!feeder1.hal-mli.net!news.albasani.net!.POSTED!not-for-mail From: "Helge Haensel" Newsgroups: comp.lang.basic.misc Subject: Difference of dates in years Date: Fri, 18 May 2012 17:23:34 +0200 Organization: albasani.net Lines: 14 Message-ID: Mime-Version: 1.0 Content-Type: text/plain; charset=iso-8859-15; format=flowed; delsp=yes Content-Transfer-Encoding: 7bit X-Trace: news.albasani.net fStPEkwLCWkiDRQiVjuJAOorR1E6pqHjDO7Dgopvps/Fyhm9wjrAjYae4n69nMsHSeq8SrNk/XxkDAZeWHmkzll+4SCtwwgsjUzkr2aLmSCOI1yFrRu+Mec30lZlPLGc NNTP-Posting-Date: Fri, 18 May 2012 15:23:39 +0000 (UTC) Injection-Info: news.albasani.net; logging-data="z1uOuTfk31rE6xu+2UoxJ2G52lGvcqfkr96EV2W54XG8Q7GGG/R2r9o9hIQeMSRKvy8AzTeQxSZ3f7S6OdGUQB9KMB32ODTkdY7eoxBcVoYd/Z2oRHPpNwuBMIScDTuq"; mail-complaints-to="abuse@albasani.net" User-Agent: Opera Mail/11.64 (Win32) Cancel-Lock: sha1:Voly0STM44WwPdkGNY+MEKfpSSc= Xref: csiph.com comp.lang.basic.misc:274 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