[ibrahimmakhool]

(02-12-19, 12:19 PM)smalw كتب :

كود :

dim cmd as new oledbCommand("Select columntext From tablename Where columndate Between @date1 And @date2",con)
cmd.parameters.addwithvalue("@date1",datetimepicker1.value.date)
cmd.parameters.addwithvalue("@date2",datetimepicker2.value.date)
con.open
dim s=cmd.executescalar
con.close

if s isnot nothing then
msgbox s
end if

لكن طلبك بحث عادي مش بحث متقدم

لا اعلم صديقي انا جديد في عالم فيجوال بيسك في صور بالمرفقات يمكن توضح ما اريد وشكرا