السلام عليكم ورحمة الله وبركاته
أقوم بكتابة برنامج فيه يتم تنظيف كل الخانات من text و combo ولكنه لم ينفذ هذه الخطوات مع العلم أنه لدي خمس قوائم ومرتبطة مع بعض باسم combo1
For i = 0 To 4
Combo1(i).Text = ""
Form1.Print i
Next i
التعامل مع combo من خلال هىيثء
مغلق
لعلك تقصدين index ب"هىيثء"، حصل خير عموما.
اكتبي في حدث معين ( ضغط زر مثلا):
For i = 0 To 4 Combo(i).Clear Next i
وبالتوفيق بإذن الله.
تم تعديل هذه المشاركة بواسطة walcom في 7 يونيو 2004 في 15:31
فكر بطريقة أخرى
بارك الله فيك على سرعة الإجابة
نعم أقصد index
عند تجربة هدا الكود فإنه يقوم بمسح جميع محتوى القائمة ولكن الذي أريده مسح النص الظاهر فقط
جربي الكود التالي
Private Sub Command1_Click() For i = Combo1(1).ListIndex To Combo1(1).ListCount Combo1(1).List(i) = Combo1(1).List(i + 1) Next End Sub
من قال لا إله إلا الله صادقا دخل الجنة
موقعي للتعارف و تبادل الأخبار http://www.xybond.com
هذا الموضوع مغلق.