Public Function FirstOfMonth(ByVal xDate As Date) As Date
FirstOfMonth = DateSerial(Year(xDate), Month(xDate), 1)
End Function
Tinggalkan sebuah Komentar
Belum ada komentar.
Komentar RSS Lacak Balik URI Pengenal
Public Function FirstOfMonth(ByVal xDate As Date) As Date
FirstOfMonth = DateSerial(Year(xDate), Month(xDate), 1)
End Function
Tinggalkan sebuah Komentar
Belum ada komentar.
Komentar RSS Lacak Balik URI Pengenal