PDA

View Full Version : فرمول اختلاف دو ساعت



safasoft
سه شنبه 02 مهر 1387, 10:46 صبح
با سلام
اگه كسي فرمول محاسبه اختلاف دو ساعت را بلده به من هم بگه .
ممنونم .:ناراحت:

morteza_261
سه شنبه 02 مهر 1387, 12:58 عصر
سلام

Dim h AsInteger, m AsIntegerh = DateDiff(DateInterval.Hour, TimeSerial(12, 0, 0), TimeSerial(16, 50, 0))
m = DateDiff(DateInterval.Minute, TimeSerial(12, 0, 0), TimeSerial(16, 50, 0)) Mod 60
MsgBox(CStr(h) + ":" + CStr(m))


برگرفته از صفحه 4 برنامه نویسhttp://barnamenevis.org/forum/showthread.php?t=123221
لطفت قبل از ایجاد تایپک جستجو کنید
ایام به کام