求格林威治时间转化成北京时间的函数

leyson 2005-10-19 05:36:38
Tue, 30 Nov 2004 01:35:29 GMT
这样的字符串转化成
2004-11-30 1:35:29
...全文
395 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
leyson 2005-10-21
  • 打赏
  • 举报
回复
莫版主,我求函数当然知道是要自己写的了,有现成的怎么要求人家
你多写点经典代码出来让大家学习学习啊


sunxl(小呆) ,谢谢你,否则我要写一大堆代码去解析字符串了

总共才能给100分,真是不好意思
脆皮大雪糕 2005-10-20
  • 打赏
  • 举报
回复
呵呵,LZ中学地理课没认真读,中国位于+8区格林威治时间加8个小时就是北京时间
孙小雄 2005-10-20
  • 打赏
  • 举报
回复
谢谢 northwolves(狼行天下) 的提醒!


格林威治时间转化成北京时间要加 8 小时


times = "Tue, 30 Nov 2004 01:35:29 GMT"
times_1 = Replace(times, "GMT", "") '去掉GMT
times_1 = Right(times_1, Len(times_1) - InStr(1, times_1, ","))
MsgBox DateAdd("h", 8, Format(times_1, "yyyy-mm-dd hh:mm:ss"))
leyson 2005-10-20
  • 打赏
  • 举报
回复
都是星星,我喜欢!怎么才能够给你们每人一百分啊?
northwolves 2005-10-19
  • 打赏
  • 举报
回复
好象格林威治时间转化成北京时间,要加 8 小时
孙小雄 2005-10-19
  • 打赏
  • 举报
回复
times = "Tue, 30 Nov 2004 01:35:29 GMT"
times_1 = Replace(times, "GMT", "") '去掉GMT
times_1 = Right(times_1, Len(times_1) - InStr(1, times_1, ","))
MsgBox Format(times_1, "yyyy-mm-dd hh:mm:ss")
daisy8675 2005-10-19
  • 打赏
  • 举报
回复
自己写函数

7,763

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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