找一段代碼

KAMCHIHAU 2011-02-13 01:25:10
我對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類
...全文
83 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
十豆三 2011-02-14
  • 打赏
  • 举报
回复
KAMCHIHAU 2011-02-13
  • 打赏
  • 举报
回复
應該是我自己搞錯了,

fromday=CTOD('2/3/1945')&& 如果一個人的出生日期是1945年二月三號

maxnumber=(65*12)&& 那他65歲會是

kb= GOMONTH(fromday,maxnumber) && 這樣就65歲的DATE()類

其實VFP都是很USER FRIENDLY的,

kb=fromday+23 &&從fromday開始加23天的DATE()類

這樣就等同於LINUX中他們常用的MKTIME函數了,

有時搞得太多編程語言,自己的腦袋都在打卡,


謝大家


2,723

社区成员

发帖
与我相关
我的任务
社区描述
VFP,是Microsoft公司推出的数据库开发软件,用它来开发数据库,既简单又方便。
社区管理员
  • VFP社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧