if  ltrim(str(month(date())))=1
        b45=alltrim(str(val(ltrim(str(year(date()))))-1))+'年12月'
      else
        b45= ltrim(str(year(date())))+'年'+ltrim(str(month(date()-30)))+'月'   
 endif  

问题:当调试程序时将本地计算机的日期调整为:2014年1月,即:ltrim(str(month(date())))=1 为.T.,b45='2013',为什么不是'2013年12月',请高手指教!谢谢

若本地计算机系统日期改为"2013年1月",只返回'2012'

判断语句没问题,但始终不能返回正确的值.
工资单要显示上个月的月份,就是2014年1月发2013年12月的工资

改了,还是这样,你试试

if  month(date())=1            
       b45=TRANSFORM(year(GOMONTH(DATE(),-1)))+'年'+TRANSFORM(month(GOMONTH(DATE(),-1)))+'月'
     else
        b45= ltrim(str(year(date())))+'年'+ltrim(str(month(date()-30)))+'月'   
 endif

这样还是不对

不是1月份,年份不要变,只要月份-1

对,假如是'2013年10月23日',要的是'2013年9月'

哦,是可以的。谢谢!我再看看其中应用的函数的含义