Главная страницаОбратная связьКарта сайта

Разница между двумя датами в годах, месяцах и днях



Function GetAge(dtDOB As Date, Optional dtDateTo As Date = 0) As String
' dtDateTo передана?
If dtDateTo = 0 Then
dtDateTo = Date
End If
GetAge = Format$(dtDateTo - dtDOB, "yy - mm - dd")
End Function


Обсудить статью на форуме


Если Вас заинтересовала или понравилась информация программирование на Visual Basic - "Разница между двумя датами в годах, месяцах и днях", Вы можете поставить закладку в социальной сети или в своём блоге на данную страницу:

Так же Вы можете задать вопрос по работе этого модуля или примера через форму обратной связи, в сообщение обязательно указывайте название или ссылку на статью!
   


Copyright © 2008 - 2017 Дискета.info