في الكود التالي : لغة البرمجة VB6


Adodc1.RecordSource = "select * from INFO where name='" & Text1.Text & "' and city='" & Text2.Text & "' and date >= #" & Text3& "#  and  date <= #" & Text4& "#"
Adodc1.CommandType = adCmdText
Adodc1.Refresh


Text  أداة تيكست بوكس
Text1 , text2 , Text3 ,Text4

INFO اسم الجدول
name . city  . date  اسماء الأعمدة

أرجو مساعدتي في تعديل الكود بحيث تظهر النتائج حسب التصفية في DataGrid كمايلي :
مثلا :
في  TEXT1 البحث حسب الاسم عند كتابة اسم احمد ارغب ان تكون التصفية حسب الحرف أ ثم أح ثم أحم ثم أحمد
TEXT2 البحث حسب المدينة . نفس الشيء


سؤال آخر 
عند كتابة الكود التالي للبحث بين عمودين رقميين على النحو التالي يظهر الكود بلون أحمر
حاولت عدة مرات معرفة الخطأ ولم أتمكن 

Adodc3.RecordSource = " select * from INFO where NUMBER like '" & Combo7 & "*'" And NUMBER2 Like '" & Combo8 & "*'"

لكم الشكر الجزيل