Dim d1 As Date = #6/17/2015 17:05:29#
Dim d2 As Date = #6/17/2015 20:11:49#
Dim DT2 As TimeSpan = D2 - D1
Dim t As TimeSpan = d2 - d1
Output.Show(t.Days & "天" & t.Hours & "小时" & t.Minutes & "分" & t.Seconds & "秒")
OUTPUT.Show(DT2.Minutes)
我在进行一个时间差计算时，碰到一个问题，之前一直没发现，在测试的时候发现了问题，按照正常理解，上面的日期时间相减的话，得出的应该是3小时6分钟，那么全部换算成分钟后应该是186分钟，那么在单独区分钟数后，显示的结果只是6分钟，没有把之前3个小时转换成分钟数来计算，这个是我不会用还是有其他的解决办法，请高手支招，谢谢！
刚仔细看了帮助，使用这个参数解决：TotalMinutes
[此贴子已经被作者于2015/6/17 21:12:39编辑过]
加好友 
发短信
Post By：2015/6/17 21:10:00 [显示全部帖子]
