[فراس محي]

السلام عليكم اخوتي 
عندي مشكله 
انا استخدم جمله select 
لفتح جدول رقم واحد وجمله اخرى لفتح جدول الثاني وعملت جمله for i =1 to rs.recordcount 
لاضافه اسم السياره في كومبو بوكس واحد 
واضافه المواد الاحتياطيه في كومبو بوكس رقم اثنين 
المشكله هيه عدم اضافه الماده الاخيره من المواد الاحتياطيه بمعنى انيي لدي اربع مواد في الجدول وهي محرك كير شمعات اكسل سضهر فقط ثلاث مواد الماده الاخير لايستدعيها بكل الحالات حاولت لايرى الماده الاخيره من البيانات

[Taha Okla]

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

الأفضل أن لا تستخدم For  بل استخدم حلقات Do Loop
يعني استخدم الكود التالي :

كود :

If Rs.RecordCount > 0 Then Rs.MoveFirst
Do Until Rs.EOF
   '  هنا ضع أكواد تعبئة الكمبوبوكس أوالأدوات الأخرى
   Rs.MoveNext
Loop