Visual Basic 6 中是否有函数可用于将儒略日期字符串 (99001-1st of Jan 1999) 转换为 Date
对象?
我试过使用 CDate()
但结果不如预期。
谢谢。
最佳答案
我认为以下内容可行,只需将您的朱利安日期放入 jd 变量即可。
Dim dt as Date
Dim jd as Long
dt = DateSerial(1900 + Int(jd / 1000), 1, jd Mod 1000)
https://stackoverflow.com/questions/4723330/