现有一个数据文件，里面存入的日期数值为秒数（4个字节），现用VB读出来，转换成日期时与数据文件真实表达的日期相差8小时，不知何因，向老师求助！谢谢

dim aaa as long
aaa=1403850000    '图片上的秒数
Dim FromDate As Date   '
Dim ToDate As Date   '
FromDate = #1/1/1970#

ToDate = DateAdd("s", aaa, FromDate)
MsgBox ToDate

程序运行结果是：2014-6-27 6：20：00


而数据文件中显示的日期是：2014-6-27 14：20：00
实际上数据的真实时间也是：2014-6-27 14：20：00，
而通过VB计算出来的时间要差8个小时。这是什么原因造成的。


谢谢！！！

JPG 里的时间是 格林威治时间，而显示给你看的时间是中国时间。
中国时间是 UTC+08：00 ，也有记作 GMT+8 。
你自己算一下，怎么把 格林威治时间修正为 中国时间 吧。

[ 本帖最后由 风吹过b 于 2014-7-14 10:41 编辑 ]

谢谢！原来是这样造成的。
听版主一句话，胜读十本书！

NowTime=DateAdd("h", 8, FromDate)

这样就是直接转成北京时间

谢谢各位老师！！