Public Function EndOfMonth(ByVal xDate As Date) As Date
EndOfMonth = DateSerial(Year(xDate), Month(xDate) + 1, 0)
End Function
Tinggalkan sebuah Komentar
Belum ada komentar.
Komentar RSS Lacak Balik URI Pengenal
Nilai tanggal akhir dari satu bulan
Iklan Sponsor
