بيانات في الكومبو

اخي اذا امكن تقنية ربط الفيجوال بيسك مع الاكسس

والله يا استاذي انا استخدم الادو ado

السلام عليكم

IF RS.State = adstateopen Then rs.close
Rs.open "Select Distinct(Name) from(user) order by (name) ASC" ,db ,adopenstatic ,adlockreadonly
do until rs.EOF
Name_CMB.Additem rs("Name")
rs.movenext
loop

هذا كود على السريع :D

ونصيحة لو انك جربت خاصية البحث لوجت ضالتك و بنتائج متعددة