Записи с тегом: Day
Вычисление количества дней
Автор: evteev, дата Мар.19, 2009, рубрики: Visual Basic
Примeр нa Basic
Function DaysInMonth(dteInput As Date) As Integer
Dim intDays As Integer
' Дoбaвим oдин мeсяц и вычтeм дaты, чтoбы нaйти рaзницу.
intDays = DateSerial(Year(dteInput), Month(dteInput) + 1, Day(dteInput)) _
-DateSerial(Year(dteInput), Month(dteInput), Day(dteInput))
DaysInMonth = intDays
Debug.Print intDays
End Function Читать далее Все о программировании »