Вопрос № 38282: Уважаемые эксперты, добрый день!
В БД Access есть такие данные (из трудовой книжки)
Принят Уволен
1 запись 12.02.1990 13.05.1991
2 запись 13.06 1991 20.10.2005
и т.д.
Надо вычислить общий стаж работы и записатьтак:
«10 ...
Вопрос № 38.282
Уважаемые эксперты, добрый день!
В БД Access есть такие данные (из трудовой книжки)
Принят Уволен
1 запись 12.02.1990 13.05.1991
2 запись 13.06 1991 20.10.2005
и т.д.
Надо вычислить общий стаж работы и записатьтак:
«10 лет 2 месяца 1 день»
Программа создаетсая в на VB6.
Благодарю за внимание.
Отвечает: AlexanderZh
Здравствуйте, Робатько Анатолий Васильевич!
могу посоветовать так:
1. считать (преобразовать) в переменные типа DATE
2. отнять одну от другой и присвоить значение переменной типа INTEGER или LONG
3. в результате получим дни - из них уже можно вывести остальное (правда будет заморочка с високосными годами...)
Public Sub delta()
Dim d1 As Date, d2 As Date
Dim d As Integer
d1 = "26.03.2006"
d2 = "01.04.2006"
d = d2 - d1: Debug.Print d
End Sub
Ответ отправил: AlexanderZh (статус: 5-ый класс)
Ответ отправлен: 26.03.2006, 03:50