以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何在日期输入框中输入时间变量  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=28807)

--  作者:guoqi1129
--  发布时间:2013/2/19 15:55:00
--  [求助]如何在日期输入框中输入时间变量
在窗口中日期输入框,每次打开窗口时里面要自动显示最近的整点时间,例如现在是2013-2-19 15:50:00 ,打开窗口后上面显示2013-2-19 15:00:00,如果是2013-2-19 16:02:00再次打开,时间就显示为2013-2-19 16:00:00,请问加载后计算代码如何写?
--  作者:狐狸爸爸
--  发布时间:2013/2/19 16:29:00
--  

窗口的AfterLoad事件:

 

Dm t As Date = Date.Today

t = t.AddHours(Date.Now.Hour)

e.Form.Controls("控件名").Value = t

 

当然设置窗口的时候,还得设置控件的日期时间格式,否则时间不会显示:

 

图片点击可在新窗口打开查看


--  作者:guoqi1129
--  发布时间:2013/2/19 16:43:00
--  
谢谢狐爸