以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  TimeSpanBox 控件的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=89355)
--  作者：blackzhu
--  发布时间：2016/8/19 16:48:00
--  TimeSpanBox 控件的问题
 
TimeSpanBox 控件不能写入默认值的?
e.Form.Controls("预约时间A").Text = "01:01:01" 为啥无效?
--  作者：大红袍
--  发布时间：2016/8/19 16:56:00
--  
Dim d As Date = "01:01:01"
e.Form.Controls("TimeSpanBox1").Text = d.Hour * 3600 + d.Minute * 60 + d.Second
--  作者：blackzhu
--  发布时间：2016/8/19 17:23:00
--  
 那么一个整数 如何返回到 00:00:00  这样的格式?


找到了,分享下


 Dim mystr As String = ""
 mystr = New System.TimeSpan(0, 0, "45045").ToString
outPut.show(mystr)
[此贴子已经被作者于2016/8/19 17:31:54编辑过]
--  作者：大红袍
--  发布时间：2016/8/19 17:27:00
--  

参考

 

Dim tp3 As New TimeSpan(0,0,3601)
msgbox(tp3.Hours)
msgbox(tp3.Minutes)
msgbox(tp3.Seconds)

[此贴子已经被作者于2016/8/19 17:26:50编辑过]