Una manera rápida de saber el primer día del mes de una fecha dada puede ser la siguiente:
Dim rtn As New Date
rtn = Date.Now
rtn = rtn.AddDays(-rtn.Day + 1)
y si deseas saber el último día del mes solamente le agregas:
rtn = rtn.AddDays(-rtn.Day + 1).AddMonths(1).AddDays(-1)
saludos
Thank you!
Only one comment, the correct is .AddMonths in order to .AddMonth
🙂
Thanks Carolina!