ผม Import Table เข้ามา เป็น Table ที่มี Field ชื่อ Datum (ไม่ทราบ Data Type แต่คิดว่าเป็น Date/Time) 
ใน datum ดูข้อมูลเป็น 26/07/2001 
ผมต้องการที่จะให้ User ใส่ วันที่ ๆ ต้องการ (สมมุตว่าเป็น MyDate) แล้วนำวันที่ ที่ใส่นั้นมาคำนวณ (Age) เป็นวัน เช่น 
MyDate = 04/09/2001   
Datum = 26/07/2001 
ได้ Age = 345 
ผมลองทำใน Query  
Age: Format([MyDate],"dd/mm/yyyy") -Format([dbo_Dbopen].[datum],"dd/mm/yyyy") 
แล้วมันขึ้น #ERROR 
ลอง ลบกันเฉย ๆ แบบ MyDate - [dbo_Dbopen].[datum] มันก็ขึ้น Error เหมือนกันครับ  
ถ้าทำใน Query ไม่ได้ เราไปทำที่ Report ได้ไม๊ครับ  ผมลองทำใน Report มันก็ Error  
อาจจะเป็นเพราะว่าผมอ้างอิงค่าไม่เป็นครับ คือผมเขียนแบบนี้ครับ 
 
Private Sub Report_Open(Cancel As Integer) 
Dim Message, Title, Default, MyValue, CompareDate 
Dim TheDate As Date     
Dim Msg 
Message = "Enter date of aging "     
Title = "Date of Aging Entry "    
Default = Date       
' Display message, title, and default value. 
MyValue = InputBox(Message, Title, Default) 
Reports!DebtorAging!LblAge.Caption = MyValue 
TheDate = Reports!DebtorAging!TxtDatum.Text        ******  ผิดตรงนี้ครับ ***** จุดประสงค์คือจะเอาค่าใน datum เช่น  
 
                                                                                     ****** 26/07/2001 มาหาวันกับ MyValue ที่เราใส่ไว้ตอนแรก **** 
Msg = "Age: " & DateDiff("d", MyValue, TheDate) 
MsgBox Msg 
End Sub 
 
หลังจากที่แก้โจทย์นี้ได้แล้ว อีก 1 โจทย์คือ 
ผมต้องการที่จะคำนวณ โดยการบวก Credit Term เข้าไปอีก 120 วัน แต่ต้องการนับจาก  
End of Month เช่น วันที่ใน datum เป็น 26/07/2001  (ต้องให้มันรู้เองว่าเป็นสิ้นเดือนคือ 31/07/2001 แล้ว บวกไปอีก 120  
 
วันก็จะเป็น  28/11/2001 ) 
 
ผมควรจะทำใน Query แล้วค่อย ออก Report หรือว่าทำใน Report เลยครับ