有谁知道从一个Double型的变量中分离出年月日时间信息,不能使用VB的函数

ltpao 2001-08-06 08:38:38
同上
...全文
153 12 打赏 收藏 转发到动态 举报
写回复
用AI写文章
12 条回复
切换为时间正序
请发表友善的回复…
发表回复
ltpao 2001-08-07
  • 打赏
  • 举报
回复
To:songyangk,你的思路是对的,应该是小数部分乘以24,结果是小时,结果的小数部分再乘以60是分钟,结果的小数部分再乘以60是秒,结果的小数部分再乘以1000是毫秒。
多谢,给分
songyangk 2001-08-07
  • 打赏
  • 举报
回复
小数部分除以1/24,结果是小时,余数部分再除以60是分钟,再余部分再除60是秒。剩下的可能是毫秒。
ltpao 2001-08-07
  • 打赏
  • 举报
回复
Un1在吗
ltpao 2001-08-07
  • 打赏
  • 举报
回复
To:xdd1125 你说的我都知道
To:Un1 日期是以1899-12-30 为基准,整数部分表示与此相隔的天数,是吗,那么时间部分呢?
Un1 2001-08-07
  • 打赏
  • 举报
回复
?format$(cdate(0),"yyyy/m/d hh:mm:ss")
1899-12-30 00:00:00
?cdate(1)
1899-12-31
?cdate(2)
1900-1-1
?cdate(3)
1900-1-2
?cdate(37109)
2001-8-6

明白没?
xdd1125 2001-08-06
  • 打赏
  • 举报
回复
Date 变量以Double 类型存储,并且以Double类型操作。Date 变量以IEEE 64位浮点数存储,表示日期可以从100年1月1日 到9999年12月31日 变化,时间从0:00:00 到23:59:59。任何可辨别的有文字记载的年份都可以赋值给Date 变量。当其他数据类型转换位Date类型,小数点左边的值表示日期信息,小数点右边的值表示时间。 午夜是0,中午是0.5。负数表示1899年12月30日以前的日期。

希望对你有个提示作用
一川烟草123 2001-08-06
  • 打赏
  • 举报
回复
ltpao:
本月首席专家的问题当然不是人人都知的啦..呵呵,我也有兴趣,研究一下
ltpao 2001-08-06
  • 打赏
  • 举报
回复
UP
ltpao 2001-08-06
  • 打赏
  • 举报
回复
难道没人知道?
ltpao 2001-08-06
  • 打赏
  • 举报
回复
比如 37109.8708912037 经转换后的日期和时间为2001-8-6 20:53:57
Chice_wxg 2001-08-06
  • 打赏
  • 举报
回复

dim y as double
如果这样:
a=20000102 '2000年01月02日
那么就简单了
debug.print "Year:";a\10000,"Month:";(a mod 1000)\100,"Day:";(a mod 100000)

ltpao 2001-08-06
  • 打赏
  • 举报
回复
提供C源程序也行

7,759

社区成员

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

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