تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
سؤال حول البحث في combobox
#1
من فضلكم وشكرا طريقة البحث في combobox بمجرد كتابة حرف اول تم ثاني ......
الرد
تم الشكر بواسطة:
#2
إجعل الـ Style للكومبو هي 0 (DropDown Combo)

في الـ General أضف
كود :
Dim blnBackSpace as Boollean

استخدم تلك الاكواد
كود :
Private Sub combo1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyBack Or KeyCode = vbKeyDelete Then blnBackSpace = True
End Sub
ةايضا ذلك الكود
كود :
Private Sub combo1_Change()
Dim i As Long
Dim lngText As Long

If combo1.Text = vbNullString Then
   blnBackSpace = False
   Exit Sub
End If
'----------------------
For i = 0 To combo1.ListCount - 1
   If InStr(1, combo1.List(i), combo1.Text, vbTextCompare) = 1 Then
       If blnBackSpace = True Then
           lngText = combo1.SelStart - 1
           blnBackSpace = False
       Else
           lngText = combo1.SelStart
       End If
       combo1.Text = combo1.List(i)
       '----------------Add--Your-Action-Here---------
       
       '---------------------------------------------------
       combo1.SelStart = lngText
       combo1.SelLength = Len(combo1.Text) - lngText
       Exit For
   End If
   If i = combo1.ListCount - 1 Then combo1 = ""
Next
الرد
تم الشكر بواسطة: Ahmed_Mansoor , sendbad100 , Amir_Alzubidy
#3
اخي اريد عند كتابة الحرف الاول ان يعطيني جميع الاسماء الموجودة بالحرف الاول تم الحرف التاني تظهر تاني كما هي هنانا
S
Sa
sal
....
الرد
تم الشكر بواسطة:
#4
أخي الكريم هناك ملحوظة مهمة

عند كتابة الحرف وفتح القائمة المنسدلة للاداة سوف تجد أن او عنصر يبدأ بما كتبته قد تم تحديده
او تتحرك بين العناصر التي كتبت حروف منها عن طريق الاسهم صعودا وهبوطا
ولتسهيل الامر قم بتغيير خاصية Sorted للاداة إلي True
--------------------------------------------------------------------
وممكن تجعل الاداة تحتوي علي العناصر التي تكتب حروف منها فقط إذا كان مصدر عناصر الاداة من قاعدة بيانات
من خلال البحث في القاعدة عن الاسماء (مثلا) التي تحوي ما كتبت من حروف ثم يعيد ملئ الاداة بناتج البحث
ويعمل تلك العملية في كل مرة تكتب فيها حرف جديد
--------------------------------------------------------------
وإذا كنت تريد شيء بعيد عن ذلك فالله المستعان
ولن أبخل بما تريد إذا تيسر لي ذلك
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال حول طول ال label haider kh 3 113 14-04-19, 05:36 PM
آخر رد: haider kh
  سؤال في قوائم الفيجوال tighrmte 19 544 13-04-19, 06:27 PM
آخر رد: حامد محمد
  البحث عن أداة ocx dr.mostashar 1 87 11-04-19, 07:05 PM
آخر رد: جاسم عبد
  سؤال حول التنقل بين ال textbox haider kh 9 260 23-03-19, 06:29 PM
آخر رد: haider kh
  سؤال في listbox tighrmte 1 146 23-03-19, 02:31 AM
آخر رد: أبو أسامة2
Question [vb6.0] كيف اجعل عند النقر على ComboBox تظهر للمستخدم رسالة ؟؟ Microformt 6 412 10-03-19, 02:12 PM
آخر رد: Microformt
  سؤال في شاشة عرض البرنامج tighrmte 3 194 20-02-19, 07:13 PM
آخر رد: tighrmte
  سؤال في تحزيم البرنامج tighrmte 6 208 11-02-19, 09:57 PM
آخر رد: tighrmte
  سؤال في اداة msflixgrid tighrmte 2 133 04-02-19, 11:37 PM
آخر رد: tighrmte
  سؤال بخصوص النقط والفواصل العشرية وغيرها في قاعدة البيانات hannileo 3 206 24-01-19, 01:58 PM
آخر رد: عبدالله الصافي

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم