تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] كيف أستطيع منع التكرار في ComboBox
#1
بسم الله الرحمن الرحيم 



أخوتي الكرام 



كيف أستطيع منع التكرار في ComboBox



حيث أن الـ ComboBox مربوطة بقاعدة بيانات أكسس

 

و العمودة المربوطة فيه يحتوي على أسماء 



و في هذا العمود التكرار مسموح 



كيف أستطيع جعل الـ ComboBox تعرض الاسم المكرر مرة واحدة فقط 





و لكم جزيل الشكر 



في المرفقات مثال بسيط للتعديل و المساعدة 


الملفات المرفقة
.rar   Combobox 3 Solution.rar (الحجم : 193.46 ك ب / التحميلات : 54)
الرد
تم الشكر بواسطة:
#2
السلام عليكم أخي العزيز ورحمة الله وبركاته
لقد تم التعديل على المشروع بناء لطلبكم
المشروع بعد التعديل عليه :

.rar   khodor1985 - Combobox 3 Solution.rar (الحجم : 206.31 ك ب / التحميلات : 249)

الجملة المستهدفة في المشروع :
PHP كود :
Public SQLString As String "SELECT FullName FROM TBLContact Group By FullName" 

أتمنى لك التوفيق
واعبد ربك حتى يأتيك اليقين
الرد
#3
ألف ألف شكر أخي الكريم 
جاري التجريب

النتيجة رائعة أخي الكريم
ألف ألف شكر 

أخي هل من الممكن إضافة خاصية إكمال النص حسب المحفوظ داخل الـ ComboBox

يعني إذا كانت القائمة كبيرة و أنا أكتب اسم محفوظ مسبقا فيقوم بالتنبؤ به و اقتراحه 

و لك كل الشكر
الرد
تم الشكر بواسطة: حريف برمجة
#4
رد متأخر:

الكود:ضعة في نفس الحدث.

Private Sub TextBox1_Changed(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.ClientSizeChanged
If con.State = ConnectionState.Closed Then
con.Open()
End If
Dim cmd As New OleDbCommand("SELECT الحقل FROM الجدول", con)
Dim ds As New DataSet
Dim da As New OleDbDataAdapter(cmd)
ds.Clear()
da.Fill(ds, "list")
Dim col As New AutoCompleteStringCollection
Dim i As Integer
For i = 0 To ds.Tables(0).Rows.Count - 1
col.Add(ds.Tables(0).Rows(i)(0).ToString())
Next
con.Close()
TextBox1.AutoCompleteSource = AutoCompleteSource.CustomSource
TextBox1.AutoCompleteCustomSource = col
TextBox1.AutoCompleteMode = AutoCompleteMode.Suggest
End Sub
 الذي يدعي ان لغته هي افضل لغة برمجة، فاعلم انه مستخدم وليس مبرمج.
الرد



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


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