แปลงเป็น type DateTime แล้วใช้ method Add(TimeSpan) จัดการ
Date :
2010-06-06 11:32:53
By :
tungman
No. 2
Guest
ใช้ Data Diff()
Dim time_in As Date = Rs("time_in")
Dim time_out As Date = Rs("time_out")
Dim hour As Integer = DateDiff(DateInterval.Hour, time_in, time_out)
Label7.Text = hour