找一段代碼
我對VFP是初學的
fromday=CTOD('2/3/1945')//如果一個人的出生日期是1945年二月三號
maxnumber=(65*12)//那他65歲會是
liuwuis={}
FOR m=1 TO 20000
kb= GOMONTH(fromday,m)
IF m<=maxnumber
liuwuis=kb
endif
ENDFOR
MESSAGEBOX(DTOC(liuwuis))//報出他65歲的DATE類
有時用FOR循環好像很怪,
VFP中有沒有那些想PHP中的MKTIME類