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

نسخة كاملة : احتاج مساعدة في الكومبو بوكس
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم
احتاج مساعده في الكمبو يوكس بطيء عند الضغط عليه حيث يحتوي علي كميه كبيره من البيانات
كيف تسريع هذه الخاصيه ..حيث ارفق لكم مثال
اتمنى ان تعدلوا علي المثال ليكون فتح الكمبو اسرع ..ولكم جزيل الشكر
ارجوا من هو مختص بالثريد اضافته للمثال الذي ارفقته وشكرا
استخدم datacombo بدل combobox فهي اسرع 
كود :
Private Sub DataCombo1_GotFocus()
If rs2.State = 1 Then rs2.Close
rs2.Open "select * from drug", conn2, adOpenStatic, adLockPessimistic
Set DataCombo1.RowSource = rs2
DataCombo1.ListField = "drug_t"

End Sub
شكرا اخي لقد استخدمت الادات وكانت نتائجها ممتازه