| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2183 人关注过本帖
标题:关于日期函数DateAdd的问题
只看楼主 加入收藏
kfp_kaka
Rank: 4
等 级:贵宾
威 望:13
帖 子:353
专家分:0
注 册:2006-1-12
收藏
 问题点数:0 回复次数:7 
关于日期函数DateAdd的问题

不是有个函数是DateAdd的吗?我写了下面这个代码,为什么会出错呢?
Private Sub Form_Click()
Dim ti As Data
ti = DateAdd("ww", 2, #1/7/1984#)
Print ti
End Sub

搜索更多相关主题的帖子: DateAdd 函数 Sub Print Form 
2006-01-13 21:33
leon2
Rank: 3Rank: 3
等 级:新手上路
威 望:7
帖 子:731
专家分:0
注 册:2005-3-18
收藏
得分:0 

写代码不要那么粗心!

Private Sub Form_Click()
Dim ti As Date
ti = DateAdd("ww", 2, #1/7/1984#)
Print ti
End Sub

2006-01-13 21:40
kfp_kaka
Rank: 4
等 级:贵宾
威 望:13
帖 子:353
专家分:0
注 册:2006-1-12
收藏
得分:0 

呵呵,我会吸取教训的


爱一个人不一定要拥有她 拥有一个人就一定要好好的爱她
2006-01-13 21:47
moshen62
Rank: 1
等 级:新手上路
帖 子:72
专家分:0
注 册:2006-1-12
收藏
得分:0 
一般我都是
Cdate(Clng(Date)+20)
进行时间判断的时候也是把时间转换为Clng(date)
我在写考勤软件的时候这样用
而且在数据库字段中的有关日期的都使用Clng(Date)

2006-01-14 09:12
kfp_kaka
Rank: 4
等 级:贵宾
威 望:13
帖 子:353
专家分:0
注 册:2006-1-12
收藏
得分:0 
moshen62,可以解释一下Cdate(Clng(Date)+20)这句吗?
看得不是很懂,Date不是返回当前系统的时间的吗?为什么还要调用clng函数呢?+20又是怎么理解呢?

爱一个人不一定要拥有她 拥有一个人就一定要好好的爱她
2006-01-14 09:53
moshen62
Rank: 1
等 级:新手上路
帖 子:72
专家分:0
注 册:2006-1-12
收藏
得分:0 
就是转换当前时期为相对数
加20就是20天啊
因为转化后每加1就是一天
这样计算的时候很方便查看

2006-01-14 10:02
moshen62
Rank: 1
等 级:新手上路
帖 子:72
专家分:0
注 册:2006-1-12
收藏
得分:0 
Cdbl(Now)就是就是转换当前 的时间和日期 其中小数点以前是日期小数点以后是时间
用来计算时间差也很直观
Csin(Now)的精度每有Cdbl大 可以计算时间到分位

2006-01-14 10:04
kfp_kaka
Rank: 4
等 级:贵宾
威 望:13
帖 子:353
专家分:0
注 册:2006-1-12
收藏
得分:0 
哈~,谢谢啦,明白了

爱一个人不一定要拥有她 拥有一个人就一定要好好的爱她
2006-01-14 10:38
快速回复:关于日期函数DateAdd的问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.016146 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved