Access不足一个小时也按一个小时计算
时间:2013-07-13 15:23 来源:office中国 作者:access学习交流 阅读:次
生活中很多事情都是按小时计算的。不足一小时也按一小时收费。比如体育馆,
下面的函数计算出如果小于1个小时的话,会自动加1
dim timesum As Long
If (DateDiff("n", Me.Timestart, Me.timefinish) Mod 60) <> 0 Then
Me.tsum2 = Int(DateDiff("n", Me.Timestart, Me.timefinish) / 60) + 1
ElseIf (DateDiff("n", Me.Timestart, Me.timefinish) Mod 60) = 0 Then
Me.tsum2 = Int(DateDiff("n", Me.Timestart, Me.timefinish) / 60)
End If
下面的函数计算出如果小于1个小时的话,会自动加1
dim timesum As Long
If (DateDiff("n", Me.Timestart, Me.timefinish) Mod 60) <> 0 Then
Me.tsum2 = Int(DateDiff("n", Me.Timestart, Me.timefinish) / 60) + 1
ElseIf (DateDiff("n", Me.Timestart, Me.timefinish) Mod 60) = 0 Then
Me.tsum2 = Int(DateDiff("n", Me.Timestart, Me.timefinish) / 60)
End If
(责任编辑:admin)
顶一下
(3)
100%
踩一下
(0)
0%
相关内容
- ·两个未公开的ACCESS方法的使用技巧
- ·如何拆分复制的Access 97数据库
- ·两个未公开的ACCESS方法的使用技巧
- ·用Access 2000有效地组织班级管理
- ·数据在Access与Office组件间自由流动
- ·Access"智库"培训--高效设计 敏捷开
- ·Access查询的基本知识(二)(Office免费
- ·Access设置宏的安全等级
- ·Access查询的基本知识(Office免费公开
- ·四种用代码打开外部Access(MDB)的方法
- ·access操作或事件已被禁用模式阻止的解
- ·简述vba字符串,函数,表达式等基础术
- ·Access VBA 开发公开课讲座
- ·Access设置信任位置
- ·Access应用程序应注意的几个问题
- ·简析能判断Access版本的窗体
最新内容
推荐内容