作者在 2021-04-20 09:30:15 发布以下内容
在EXCEL中,将日期型数据:2021-04-20 转换为文本数据后,其值变为 44306,如何在VFP中将44306 转换为日期型数据:2021-04-20
解决方案:
? DATE(1899, 12, 30) + 44306
转换结果:2021-04-20
下面代码由都市夜猫提供:https://bbs.csdn.net/topics/392189538
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