السلام عليكم ورحمة الله وبركاته
الإخوة الأفاضل، أريد تعبئة مدخلات عمود في قاعدة بياناتي داخل أداة الـListBox .. وقد كنت أفكر في طريقة لعمل ذلك، وخطر ببالي هذا الكود:
For i = 1 To Data1.Recordset.RecordCount - 1
List1.AddItem (Data1.Recordset("Time").Value)
Data1.Recordset.MoveNext
Nextبسيط جدا،، لكن..
لا أدري حقا ماهي المشكلة في الأمر "Data1.Recordset.RecordCount" حيث أنني حينما اطبقه بادئ الأمر يعطيني أن هناك فقط مدخل واحد، لكن حينما أضغط على أداة الـData1 مستعرضا العنصر التالي مثلا ومن ثم أشيك على قيمة الـ"Data1.Recordset.RecordCount" أجدها القيمة الفعلية 5 في حالتنا هذه.. وفي المرفق مثال بسيط على هذا..
حقيقة هذا الأمر أرقني، ويبدو أنني سأصاب بجلطة في عمر مبكر بسببه، فأرجو بارك الله فيكم ان تشرحوا لي أين مكمن الخلل في هذا، أم هل استخدامي للأمر "Data1.Recordset.RecordCount" هو استخدام خاطئ، ولا يعطيني العدد الفعلي لمدخلات العمود الفلاني في قاعدة البيانات؟
وهناك أمر آخر، وهو أن لأداة الـListBox خصائص خاصة بقاعدة البيانات، كـDataSource وDataField فلماذا حينما أحدد قيم هذه الخصائص لا يتم استعراضها مباشرة كما يحدث في الـTextBox مثلا؟
والأمر الأخير، هو أنه في حال كان استخدامي لهذا الكود في تعبئة الـListBox خاطئا فأرجو تزويدي بكود صحيح يقوم بهذا العمل،، وجزاكم الله خيرا..
أخوكم