Вычислить количество дней между двумя датами — Visual Basic(Бейсик)

1
2
3
4
5
6
7
8
9
iDateOne = #9/8/2004# ' "08.09.04"
iDateTwo = #10/8/2004# ' "08.10.04"
 
iCountOfDays = iDateTwo - iDateOne ' Вариант I.
 
iDateOne = #9/8/2004# ' "08.09.04"
iDateTwo = #10/8/2004# ' "08.10.04"
 
iCountOfDays = DateDiff("d", iDateOne, iDateTwo) ' Вариант II.

Leave a Comment