| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 时钟 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=143353) |
| -- 作者：huizhong -- 发布时间：2019/11/21 16:25:00 -- 时钟 老师，我在窗口有一个标签，标签是绑定的表，表中只有一个单元格用于存储日期，想实现在表中单元格输入日期事件后，窗口中的标签显示这个日期时间的时钟，例如：12：30：09，该值输入后，窗口按照该值进行时间蹦字，请问，窗口的“计时器代码”该如何写？ |
| -- 作者：有点蓝 -- 发布时间：2019/11/21 16:56:00 -- 窗口按照该值进行时间蹦字 -- 啥意思？没看懂 |
| -- 作者：huizhong -- 发布时间：2019/11/22 10:46:00 -- 窗口标签是绑定表的，也就是窗口标签的“时分秒”是通过其他窗口的输入框输入进去的，例如：12:32:09，而不是当前时间NOW,这样的话，窗口的计时器代码该如何写，最终时间历史时钟的正常运转 e.Form.Controls("Label5").text = ？？？
|
| -- 作者：狐狸爸爸 -- 发布时间：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 -- 发布时间：2019/11/22 13:33:00 -- 谢谢老师 |
| -- 作者：huizhong -- 发布时间：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 |
| -- 作者：有点蓝 -- 发布时间：2019/11/22 14:20:00 -- 正常，控件的值是不会自己变动的，而now是和电脑时间同步的 |
| -- 作者：huizhong -- 发布时间：2019/11/22 14:48:00 -- 如果我想实现在指定的时间“时分秒”基础上控件Label显示可以按秒更新该怎么做呢？ |
| -- 作者：有点蓝 -- 发布时间：2019/11/22 14:51:00 -- 试试 static _d as date = e.Form.Controls("TextBox3").value e.Form.Controls("Label1").text = _d.AddSeconds(1)
|
| -- 作者：huizhong -- 发布时间：2019/11/22 15:01:00 -- 谢谢老师 |