主题：请假天数

帮我看一下代码，为什么不能显示出天数，总是显示1.

Dim d1 As Date = e.Form.Controls("开始时间").value
Dim d2 As Date = e.Form.Controls("结束时间").value
Dim t As TimeSpan = d2 - d1

e.Form.Controls("请假天数").value = (t.Hours - 9)/24 + 1