منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

سلام عليكم ورحمه الله وبركاته

عندي الكود التالي 

واريد ان احولة الى كود برمجي اخر يعطي نفس الشي كنت استخدم اداة  ادودك 
اريد ان يكون  على طريقة الربط بدون ادوات يعني مثلا

يعني استاذة كنت استخدم ادوات الربط الان اصبحت استخدم مكتبة 2.8

---

هذا الكود مش زابط معي والله

If Not Combo1.Text = "الكل" Then rs.Filter = "xnat LIKE '" & Combo1.Text & "'and xstat='" & Combo2.Text & "'and xsex='" & Combo3.Text & "'and xage Between " & Text121.Text & " AND " & Text131.Text & " Order By myage" * ""

Set DataGrid1.DataSource = rs

هذا الكود شغال لاكن عندما اضع مع البحث البحث عن العمر بين رقمين ما بيزبط
age = xage filed
between text121 and text 131

تفضل استاذي الغالي امير 

الاستعلامات التي اريد هي باللون الاصفر

---

استاذ امير في مربعين تيكست لونهم اصفر عشان فلترة العمر من كذا الى كذا

اشكرك استاذي الغالي
انا عملت بنصيحتك واستخدم الفيجوال الان بدون ادوات ... ادعيلي

تلميذك استاذي