标题：[求助]关于时间的计算

1楼

lxh2268 发表于：2011/8/25 14:47:00

列1显示“一天耗时时间”为字符型，其中一行显示“8小时30分”

列2显示“一月总耗时时间”为字符型，那我要计算出“8小时30分*31"（假设一个月31天）

该如何计算呢？好像乘以号“*”不支持时间格式的计算啊

难道要FOR循环31次？！

[此贴子已经被作者于2011-8-25 14:55:40编辑过]

2楼

狐狸爸爸 发表于：2011/8/25 15:07:00

Dim s As String = "8小时30分"
Dim h As Integer = val(s)
Dim m As Integer = val(s.Substring(s.Indexof("小时")+2))
Dim v As Integer= h * 60 * 31 + m * 31
s = (v \ 60) & "小时" & (v Mod 60 ) & "分"
Return s

3楼

lxh2268 发表于：2011/8/25 15:13:00

以下是引用狐狸爸爸在2011-8-25 15:07:00的发言：
Dim s As String = "8小时30分"
Dim h As Integer = val(s)
Dim m As Integer = val(s.Substring(s.Indexof("小时")+2))
Dim v As Integer= h * 60 * 31 + m * 31
s = (v \ 60) & "小时" & (v Mod 60 ) & "分"
Return s

谢谢狐爸，我研究一下

共3 条记录, 每页显示 10 条, 页签: [1]