كيف اقوم بعمل هذا الاستعلام - بارك الله لكم

جرب أخى هذا الكود للدالة وجرب الأمرين وعسى أن

Public Function date_avarage(ByVal y1 As Date, ByVal y2 As Date) As Date

		date_avarage = CDate(CLng((CLng(y1) + CLng(y2)) / 2))
		'date_avarage = (y1 + y2) / 2
End Function

أو صحح ما كتبت أنت فى الإستعلام إلى

([تاريخ اول]+[تاريخ ثانى] )/2