月底日一共有四种：28日或29日或30日或31日。vb有没有一个函数能测出某月的月底是哪一日。
月底日一共有四种：28日或29日或30日或31日。vb有没有一个函数能测出某月的月底是哪一日。
[解决办法]
自己用IsDate写一个，可以从31号倒推回来，直到IsDate（日期）=True，即可知道该月的最大日期。
[解决办法]
Private Function MaxDay(ByVal Y As Integer, ByVal m As Integer) As Integer
'一个月的最大天数
MaxDay = Day(DateSerial(Y, m + 1, 0))
End Function
