以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  关于日期与时间的问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=58491)

--  作者:wxn501839958
--  发布时间:2014/10/17 14:56:00
--  关于日期与时间的问题

窗口中的副本表,有一列需办日期,内容为:2014-10-18 09:00  我想让系统在时间 在 2014年10月18日9点前的15分钟时  弹出一个提示框  提示 该时间行的事项内容,单位名称内容及项目名称内容。请指点 代码写在什么位置 怎么写?

 


--  作者:Bin
--  发布时间:2014/10/17 15:00:00
--  
利用计时器来实现

取单元格内容和当前日期进行判断



--  作者:wxn501839958
--  发布时间:2014/10/17 15:16:00
--  
需办日期 这一列 有多个内容 需要判断。  请帮忙 写出 详细的 代码  谢谢
--  作者:Bin
--  发布时间:2014/10/17 15:17:00
--  
请上例子,说清楚具体需求.  代码帮助都已经有说,搞不定只能上例子.我帮你写了
--  作者:wxn501839958
--  发布时间:2014/10/17 15:24:00
--  

表名 列名 就这样标出来  写出 代码来  我自己 添加  我现有的 表名 列名 可以吗?

 


--  作者:wxn501839958
--  发布时间:2014/10/17 15:27:00
--  

或者 我给你发远程 你帮我 远程写代码 行吗?

 


--  作者:Bin
--  发布时间:2014/10/17 15:31:00
--  
设计一个提示窗口XX

计时器设置为30秒或者10秒检测一次
dim dr as datarow = datatables(X).find("日期=#" & format(date.now,"yyyy-MM-dd HH:mm") & "#")
if forms("XX").Opened=false andalso dr isnot nothing then
   forms("XX").show
end if

代码大概如上,细节有特殊需求自行更改,没有具体描述,就没有具体的代码.


搞不定就老老实实上例子,不要想着什么远程写代码这些不切实际的事情.
[此贴子已经被作者于2014-10-17 15:33:08编辑过]