Office中国论坛/Access中国论坛

标题: 怎么用DateDiff 函数?请举个例子 [打印本页]
作者: 蓝天8390    时间: 2006-12-26 18:18
标题: 怎么用DateDiff 函数?请举个例子
DateDiff 函数
作者: hi-wzj    时间: 2006-12-26 18:30
DateDiff 函数示例

本示例使用 DateDiff 函数来显示某个日期与今日相差几天。
  1. Dim TheDate As Date    '
复制代码
声明变量。

  1. Dim Msg
复制代码

  1. TheDate = InputBox("Enter a date")
复制代码

  1. Msg = "Days from today: " & DateDiff("d", Now, TheDate)
复制代码

  1. MsgBox Msg
复制代码

作者: hi-wzj    时间: 2006-12-26 18:31
在代码设计视图中，点开帮助，输入相应的关键字，然后点搜索即可。
作者: 蓝天8390    时间: 2006-12-26 19:21
谢谢版主



欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3