com12151337
سه شنبه 02 مهر 1392, 12:03 عصر
سلام دوستان
میخواستم دوستان یک راهنمایی بفرمایند چگونه از تابع جناب آزادی برای جمع دو تاریخ استفاده کنم
Public Function Diff(ByVal FromDate As Long, ByVal To_Date As Long) As Long
'Çíä ÊÇÈÚ ÊÚÏÇÏ ÑæÒåÇí Èíä Ïæ ÊÇÑíÎ ÑÇ ÇÑÇÆå ãí ßäÏ
Dim tmp As Long
Dim s1, m1, r1, s2, m2, r2 As Integer
Dim Sumation As Single
Dim flag As Boolean
flag = False
If FromDate = 0 Or IsNull(FromDate) = True Or To_Date = 0 Or IsNull(To_Date) = True Then
Diff = 0
Exit Function
End If
آیا در تیبل قسمت expression باید نوشت از اکسس 2013 استفاده میکنم
ممنونم
میخواستم دوستان یک راهنمایی بفرمایند چگونه از تابع جناب آزادی برای جمع دو تاریخ استفاده کنم
Public Function Diff(ByVal FromDate As Long, ByVal To_Date As Long) As Long
'Çíä ÊÇÈÚ ÊÚÏÇÏ ÑæÒåÇí Èíä Ïæ ÊÇÑíÎ ÑÇ ÇÑÇÆå ãí ßäÏ
Dim tmp As Long
Dim s1, m1, r1, s2, m2, r2 As Integer
Dim Sumation As Single
Dim flag As Boolean
flag = False
If FromDate = 0 Or IsNull(FromDate) = True Or To_Date = 0 Or IsNull(To_Date) = True Then
Diff = 0
Exit Function
End If
آیا در تیبل قسمت expression باید نوشت از اکسس 2013 استفاده میکنم
ممنونم