| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 如果将小时数分解成小时分钟秒 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=195854) |
| -- 作者：foxyuan -- 发布时间：2025/3/14 23:42:00 -- 如果将小时数分解成小时分钟秒 如题，如何将3.55小时计算出有h小时，m分钟，s秒？ |
| -- 作者：zm6096 -- 发布时间：2025/3/15 9:00:00 -- 以前都在论坛学习，现在也做点贡献。 下面代码测试成功 Dim totalHours As Double = 3.55 Dim ts As TimeSpan = TimeSpan.FromHours(totalHours) Dim result As String = String.Format("{0}小时{1}分{2}秒", ts.Hours, ts.Minutes, ts.Seconds) Output.Show(result) \'输出结果
|
| -- 作者：zm6096 -- 发布时间：2025/3/15 9:05:00 -- 方法二：测试成功 DataColChanged If e.DataCol.Name = "工时列" Then Dim ts As TimeSpan = TimeSpan.FromHours(e.NewValue) e.DataRow("显示列") = ts.ToString("h\'小时\'m\'分\'s\'秒\'") End If |
| -- 作者：foxyuan -- 发布时间：2025/3/15 10:30:00 -- 非常感谢，达到目的。 以下是引用zm6096在2025/3/15 9:05:00的发言：
方法二：测试成功 DataColChanged If e.DataCol.Name = "工时列" Then Dim ts As TimeSpan = TimeSpan.FromHours(e.NewValue) e.DataRow("显示列") = ts.ToString("h\'小时\'m\'分\'s\'秒\'") End If |