Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!
共4 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题：如果将小时数分解成小时分钟秒
1楼
foxyuan 发表于：2025/3/14 23:42:00
如题，如何将3.55小时计算出有h小时，m分钟，s秒？
2楼
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)
'输出结果
3楼
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

4楼
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

共4 条记录, 每页显示 10 条, 页签: [1]
Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .02344 s, 2 queries.