Tag: Month First

Function show month first for VB.Net Public Function Public Function MonthFirst(ByVal pDate As Object) As Object On Error GoTo MonthFirst_Err MonthFirst = DateSerial(Year(pDate), Month(pDate), 1) MonthFirst_Exit: Exit Function MonthFirst_Err: MonthFirst = DateSerial(Year(Now), Month(Now), 1) Resume MonthFirst_Exit End Function…