Days between dates: Difference between revisions
Content added Content deleted
No edit summary |
|||
| Line 1,622: | Line 1,622: | ||
NumberOfDays = 0 |
NumberOfDays = 0 |
||
Dim As Integer Year(1 To 2), Mounth(1 To 2), Day(1 To 2) |
Dim As Integer Year(1 To 2), Mounth(1 To 2), Day(1 To 2) |
||
Dim As Integer |
Dim As Integer NumberD, Index |
||
Year(1) = Val(Left$(from$, 4)) |
Year(1) = Val(Left$(from$, 4)) |
||
Year(2) = Val(Left$(to$, 4)) |
Year(2) = Val(Left$(to$, 4)) |
||