سلام و روز خوش
1- محاسبه فیلد تاریخ باید بصورت عدد باشه
2- نام برخی فیلدها هم از نام های رزرو شده است که باید عوض بشه
3- فیلد id رو باید primary key هم بکنین
1.png
2.png
4- در فرم جستجو فیلدها رو با input mask = 0000/00/00 تعریف کنین تا نوشتن تاریخ راحت و بامعنی باشه
3.png
5- بهتره که فیلدهای جستجوی تاریخ یک مقدار اولیه داشته باشن:
Private Sub Form_Load()Me.Pdate_Start = DMin("Pdate", "tbln")
Me.Pdate_End = DMax("Pdate", "tbln")
End Sub
6- هر فرمی باید یا دکمه close خود فرم رو داشته باشه وگرنه یک کلید برای این کار باید تعریف کنین:
Private Sub btnCancel_Click()
DoCmd.Close acForm, Me.name
End Sub
برای مابقی کار از همون تاپیک هایی که اشاره کردم ایده بگیرین.