询求快速方法,'2007/02'这种日期格式字符串,如何得到它的上一月和下一月的字符串.
-----------
比如 : '200601' 或 '2006/01'
上一个月应为:'200512' 或 '2005/12'
下一个月应为:'200602'或 '2006/02'

可是如何得到这个字符串呢?(当然,可以有分隔符,也可以没有分隔符)
谢谢.

---------------------------------------------------------------

cdate=left('200601',4)+'-'+right('200601',2)+'-'+'01'
?GOMONTH(CTOD(cDate),-1)
?GOMONTH(CTOD(cDate),1)
---------------------------------------------------------------

lcYearMonth='200601'
?'上一个月为:',left(dtos(gomonth(date(val(left(lcYearMonth,4)),val(right(lcYearMonth,2)),01),-1)),6)
?'下一个月为:',left(dtos(gomonth(date(val(left(lcYearMonth,4)),val(right(lcYearMonth,2)),01),1)),6)

lcYearMonth='2006/01'
?'上一个月为:',left(dtoc(gomonth(date(val(left(lcYearMonth,4)),val(right(lcYearMonth,2)),01),-1)),7)
?'下一个月为:',left(dtoc(gomonth(date(val(left(lcYearMonth,4)),val(right(lcYearMonth,2)),01),1)),7)

---------------------------------------------------------------

建议使用DATE（）函数，配合GOMONTH（）、YEAR（）、MONTH（）、DAY（）

date(nyear,nmonth,nday)，根据一个数值型变量返回一个日期值，不受当前日期格式限制