السلام عليكم ورحمة الله وبركاته
Data1.RecordSource = "select * from [card_sale] where [date] #" & Format(Text1.Text, "dd/mm/yyyy") & "# Data1.Refresh
جملة الاستعلام عن التاريخ صحيحة بهذا الشكل ام ماذا مع العلم اني عايز ال Format يوم شهر سنة او مش مشكلة عاديه