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月',请高手指教!谢谢

?TRANSFORM(year(GOMONTH(DATE(),-1)))+'年'+TRANSFORM(month(GOMONTH(DATE(),-1)))+'月'

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

if  ltrim(str(month(date())))=1 有病

应是
if  month(date())=1

看你的意思就是求上月份：可以这样求得
b45=TRANSFORM(year(GOMONTH(DATE(),-1)))+'年'+TRANSFORM(month(GOMONTH(DATE(),-1)))+'月'

收到的鲜花

• tlliqi 于 2013-10-23 11:29 送鲜花  10朵   附言：正确

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

不用多说，按我的改过来你就知了

if  ltrim(str(month(date())))=1
左 ltrim(str(month(date()))) 是字符型，
右 1是数值型
类型不同，怎么比较，还不是有病。

改了,还是这样,你试试

b45= ltrim(str(year(date())))+'年'+ltrim(str(month(date()-30)))+'月'   
你这样求上月份是有问题的（有些月份是28天的，你想过吗），我给你更简单为何你不采用。

[ 本帖最后由 bccn0906 于 2013-10-23 11:30 编辑 ]