int的日期格式，vfp能转换成常用的日期吗？

[wmawma123]

比如，1499348827，或者excel里的日期格式变成文本后的那种数字串，有办法在vfp里转换成日期吗？谢谢~~~~

[都市夜猫]

这样换算

nn = 14993.48827
IF nn < 60
    日期 = {^1900-1-1} + INT(nn) - 1
ELSE
    日期 = {^1900-1-1} + INT(nn) - 2
ENDIF
tt = nn - INT(nn) + 0.00001
时 = INT(tt * 24)
分 = INT((tt - 时/24) * 60*24)
秒 = INT((tt - 时/24 - 分/24/60) * 60*60*24)
tt = DATETIME(year(日期), month(日期), day(日期), 时, 分, 秒)
? nn, '=', tt

日期换算中判断的 60，是为了修正 Excel 一直存在的一个 bug，它认为 1900年2月是闰月（29天）

[wmawma123]

引用 1 楼 dkfdtf 的回复:

这样换算

nn = 14993.48827
IF nn < 60
    日期 = {^1900-1-1} + INT(nn) - 1
ELSE
    日期 = {^1900-1-1} + INT(nn) - 2
ENDIF
tt = nn - INT(nn) + 0.00001
时 = INT(tt * 24)
分 = INT((tt - 时/24) * 60*24)
秒 = INT((tt - 时/24 - 分/24/60) * 60*60*24)
tt = DATETIME(year(日期), month(日期), day(日期), 时, 分, 秒)
? nn, '=', tt

日期换算中判断的 60，是为了修正 Excel 一直存在的一个 bug，它认为 1900年2月是闰月（29天）

强大，受教了，谢谢夜猫老师~