Foxtable(狐表)用户栏目专家坐堂 → 时钟


  共有3379人关注过本帖树形打印复制链接

主题:时钟

帅哥哟,离线,有人找我吗?
huizhong
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:141 积分:1227 威望:0 精华:0 注册:2018/2/22 10:06:00
时钟  发帖心情 Post By:2019/11/21 16:25:00 [只看该作者]

老师,我在窗口有一个标签,标签是绑定的表,表中只有一个单元格用于存储日期,想实现在表中单元格输入日期事件后,窗口中的标签显示这个日期时间的时钟,例如:12:30:09,该值输入后,窗口按照该值进行时间蹦字,请问,窗口的“计时器代码”该如何写?

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109489 积分:557107 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/11/21 16:56:00 [只看该作者]

窗口按照该值进行时间蹦字 -- 啥意思?没看懂

 回到顶部
帅哥哟,离线,有人找我吗?
huizhong
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:141 积分:1227 威望:0 精华:0 注册:2018/2/22 10:06:00
  发帖心情 Post By:2019/11/22 10:46:00 [只看该作者]

窗口标签是绑定表的,也就是窗口标签的“时分秒”是通过其他窗口的输入框输入进去的,例如:12:32:09,而不是当前时间NOW,这样的话,窗口的计时器代码该如何写,最终时间历史时钟的正常运转

e.Form.Controls("Label5").text = ???

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47477 积分:251256 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2019/11/22 11:26:00 [只看该作者]

Dim t As Date = e.Form.Controls("输入框").Value
e.Form.Controls("Label5").text = t.Hour
e.Form.Controls("Label6").text = t.Minute
e.Form.Controls("Label7").text = t.Second

 回到顶部
帅哥哟,离线,有人找我吗?
huizhong
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:141 积分:1227 威望:0 精华:0 注册:2018/2/22 10:06:00
  发帖心情 Post By:2019/11/22 13:33:00 [只看该作者]

谢谢老师

 回到顶部
帅哥哟,离线,有人找我吗?
huizhong
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:141 积分:1227 威望:0 精华:0 注册:2018/2/22 10:06:00
  发帖心情 Post By:2019/11/22 14:15:00 [只看该作者]

老师,再请教一下:


Dim t As Date = e.Form.Controls("TextBox3").value
e.Form.Controls("Label1").text = t

为什么在“窗口计时器”录入以上代码,窗口时钟不走字(不动),而以下代码,时钟可以正常运转,您受累指点下

Dim t As Date = now
e.Form.Controls("Label1").text = t

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109489 积分:557107 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/11/22 14:20:00 [只看该作者]

正常,控件的值是不会自己变动的,而now是和电脑时间同步的

 回到顶部
帅哥哟,离线,有人找我吗?
huizhong
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:141 积分:1227 威望:0 精华:0 注册:2018/2/22 10:06:00
  发帖心情 Post By:2019/11/22 14:48:00 [只看该作者]

如果我想实现在指定的时间“时分秒”基础上控件Label显示可以按秒更新该怎么做呢?

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109489 积分:557107 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/11/22 14:51:00 [只看该作者]

试试

static _d as date = e.Form.Controls("TextBox3").value
e.Form.Controls("Label1").text = _d.AddSeconds(1)

 回到顶部
帅哥哟,离线,有人找我吗?
huizhong
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:141 积分:1227 威望:0 精华:0 注册:2018/2/22 10:06:00
  发帖心情 Post By:2019/11/22 15:01:00 [只看该作者]

谢谢老师

 回到顶部
总数 14 1 2 下一页