[求助] - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]

共有14597人关注过本帖树形打印复制链接主题：[求助]

foxor

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：二尾狐帖子：517 积分：4199 威望：0 精华：0 注册：2009/10/8 16:43:00

[求助]

Post By：2009/12/9 17:19:00 [只看该作者]

在计划任务中写入下列代码：
Dim t as Date = #17:10#
If Date.Now = t then
MessageBox.Show("现在是17:10")
end if
为什么没反应，而把时间改为日期就显示消息框？

狐狸爸爸

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：管理员帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2009/12/9 17:23:00 [只看该作者]

Dim t as Date = #17:10#
If Date.Now.Hour = 17 AndAlso Date.Now.Minute = 10
MessageBox.Show("现在是17:10")
end if

foxor

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：二尾狐帖子：517 积分：4199 威望：0 精华：0 注册：2009/10/8 16:43:00

Post By：2009/12/9 17:25:00 [只看该作者]

谢了！

lxl

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：MVP荣誉狐帖子：858 积分：6071 威望：0 精华：19 注册：2008/9/1 9:13:00

Post By：2009/12/9 17:27:00 [只看该作者]

你看一下下面代码的输出：
Dim t as Date = #17:10#
Output.Show(t.ToString("F"))
Output.Show(Date.Now.ToString("F"))
你就知道为什么你的代码没反应了

foxor

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：二尾狐帖子：517 积分：4199 威望：0 精华：0 注册：2009/10/8 16:43:00

Post By：2009/12/10 8:41:00 [只看该作者]

明白了，谢谢lxl

主题：[求助]