| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 显示跳动的时间 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=21838) |
| -- 作者：与伊相伴 -- 发布时间：2012/7/25 21:47:00 -- 显示跳动的时间 请教：在窗口上如何显示跳动的时间，就是每一秒钟跳一下，然后显示出来 |
| -- 作者：飞天 -- 发布时间：2012/7/25 22:01:00 -- 在系统空闲时 事件中: With CurrentTable Dim Str1 As String = "当前时间: " & Date.now() StatusBar.Message3 = Str1 End With |
| -- 作者：飞天 -- 发布时间：2012/7/25 22:05:00 -- 窗口中,启用计时,间隔1000 增加一个
Label1 控件,在计时器TimerTick事件中,如下代码:
Dim lbl As WinForm.Label lbl = e.Form.Controls("Label1") lbl.Text = "当前时间: " & Date.now() |
| -- 作者：与伊相伴 -- 发布时间：2012/7/26 8:47:00 -- 实现了，谢谢指教了 |