在窗体上有两个EditMask控件，第一个显示当前的日期，第二个显示当月的月底日期，求PB代码怎样写？
------解决方案--------------------
当前的日期 是today()
当月的月底日期
integer li_Month, li_Year
li_Year = year( today())
li_Month = month( today())
li_Month = li_Month + 1
if ( li_Month > 12 ) then
li_Month = 1
li_year = li_Year + 1
end if
当月的月底日期 = ( RelativeDate( date( li_Year, li_Month, 1 ), - 1 ) )