Public Function EndOfWeek(ByVal xDate As Date) As Date
EndOfWeek = xDate – Weekday(xDate) + 7
End Function
Tinggalkan sebuah Komentar
Belum ada komentar.
Komentar RSS Lacak Balik URI Pengenal
Public Function EndOfWeek(ByVal xDate As Date) As Date
EndOfWeek = xDate – Weekday(xDate) + 7
End Function
Tinggalkan sebuah Komentar
Belum ada komentar.
Komentar RSS Lacak Balik URI Pengenal