اظهار بيانات حقل معين في كومبوبوكس

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

لإظهار بياننات حقل ممعين في كومبوبوكس لغرض استعراض كافة البيانات اتبع الآتي :

بعد ربط قاعدة البيانات بالطبع سواء قمت بربطها بأداة مثلا باداة adodc او قمت بربطها بالكود .... فكلاهما علي حد سواء تقريبا وسنتناول الطريقتين ان شاء الله لإظهار البيانات في كومبوبوكس :

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

Private Sub Form_Load()

Do While Adodc1.Recordset.EOF = False

Combo1.AddItem Adodc1.Recordset!Name

Adodc1.Recordset.MoveNext

Loop

End Sub

في الخطوة الاولي تعني ان البرنامج سوف يتم التنفيذ لحين ان يصل لننهاية السجلات وطالما انة وصل للنهاية سوف يتم اضافة السجلات للكومبوبوكس وامر التنفيذ للإضافة السجلات في السطر الثاني اخبرنا البرنامج بأن يضيف عناصر للكومبو واحدة تلو الاخري من حقل معين من قاعدة البيانات واسم الحق الافتراضي في هذا الكود هو name بعدها كتبنا كود التنقل للسجل الىخر حتى يضيف البرنامج سجل في الكومبوبوكس وطالما انه لم ينتهي من جميع السجلات لا يزال يضيف السجلات المتبقية الخطوة الاخيرة كتبنا كلمة loop وتعني التكرار لإضافة السجلات حتي لا يضيف سجل واحد ويتوقف البرنامج عن اضافة باقي السجلات ولكن شرطة ان يضيف الجميع حتى يصل للنهاية وبذلك تكون قد حملت كافة محتويات حقل معين لتستخدمة كيفما تشاء في برنامجك

في حالة ربط قاعدة البيانات بالكود سوف تغير بعض الاشياء البسيطة فقط وليكن مثلا المتغير الذي يحمل البيانات من الريكورد سيت اسمة rs فتكتبة مكان adodc1 مع بعض التعديلات البسيطة ان شاء الله تعالي

ارجوا ان اكون قد وفقت

يمكنكم الاضافة للإستفسار

mag_de_k@yahoo.com

لسنا معلمون لكننا متعلمون ... كلنا ابناء العرب