2013年4月25日木曜日

VB　指定年月の最終日を取得　

VB　指定年月の最終日を取得　

Public Function GetLastDayOfMonth(intMonth, intYear) As Date

    Return DateSerial(intYear, intMonth + 1, 0)

End Function

0 件のコメント:

コメントを投稿