[scsi7000]

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

[scsi7000]

ارجوا من هو مختص بالثريد اضافته للمثال الذي ارفقته وشكرا

[ناجح احمد]

استخدم 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

[scsi7000]

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