بعد جلب البيانات وعرضها في الكومبو بوكس كيف يتم عرضها بشكل أبجدي بصرف النظر عن التريب الرقمي لها
انا استخدم هذا الكود في النموذج على سبيل المثال
PHP كود :
da = New SqlDataAdapter("Select * From MovTable where NameOfMov like '" & AlphaCB.Text & "%'", sqlcon)
da.Fill(dt0)
SearchResultCbB1.DataSource = dt0
SearchResultCbB1.ValueMember = "NameOfMov"
ما هو التعديل أو الإضافة المطلوبه لإتمام المطلوب ؟
السلام عليكم اخي الكريم
تفضل هذا انموذج كود لاملاء الكومبوبوكس
كود :
Dim dt As New DataTable
Dim da As New SqlDataAdapter
dt.Clear()
da = New SqlDataAdapter("Select * from GroupCode order by GrCode_Name Asc ", Con)
da.Fill(dt)
If dt.Rows.Count > 0 Then
ComboBox1.DataSource = dt
ComboBox1.DisplayMember = "GrCode_Name"
ComboBox1.ValueMember = "GrCode_Id"
ComboBox1.AutoCompleteSource = AutoCompleteSource.ListItems
Else
ComboBox1.DataSource = Nothing
End Ifo
قم بتغيير اسم الجدول والحقل الذي تريد اظهاره وان كنت تريد عكس الترتيب اي من الياء الى الالف
استبدل Asc بـ Desc
(28-03-20, 04:17 PM)ابراهيم ايبو كتب : [ -> ]السلام عليكم اخي الكريم
تفضل هذا انموذج كود لاملاء الكومبوبوكس
كود :
Dim dt As New DataTable
Dim da As New SqlDataAdapter
dt.Clear()
da = New SqlDataAdapter("Select * from GroupCode order by GrCode_Name Asc ", Con)
da.Fill(dt)
If dt.Rows.Count > 0 Then
ComboBox1.DataSource = dt
ComboBox1.DisplayMember = "GrCode_Name"
ComboBox1.ValueMember = "GrCode_Id"
ComboBox1.AutoCompleteSource = AutoCompleteSource.ListItems
Else
ComboBox1.DataSource = Nothing
End Ifo
قم بتغيير اسم الجدول والحقل الذي تريد اظهاره وان كنت تريد عكس الترتيب اي من الياء الى الالف
استبدل Asc بـ Desc
شكرا لك أخي الفاضل ابراهيم
ولكن جملة الإستعلام يجب أن تحتوي على تكست للكلمة المراد البحث عنها أو مثلها وليس إستدعاء جميع مافي الجدول من سجلات
كمن يريد البحث عن جميع السجلات التي تبدأ بالحرف س أو ع وهكذا
والجملة في الأساس تفي بالغرض ولكنها تجلب السجلات دون ترتيب أبجدي للأسماء
كما في الجملة التالية
PHP كود :
da = New SqlDataAdapter("Select * From MovTable where NameOfMov like '" & AlphaCB.Text & "%'" , sqlcon)
فلو تكرمت ضع الشرط الإملائي order by مع هذه الجملة حتى يتم المطلوب
السلام عليكم اخي الكريم
انت لاتحتاج الى ماذكرت في ان تأخذ جملة الاستعلام من مربع نص
انت تحتاج الى تكملة تلقائية بمجرد ان تكتب في الكومبو حرفا يظهر لك قائمة واقتراح حسب الاحرف التي كتبتها
وهذه تسمى AutoComplete عدل الخاصية او بالكود هكذا
كود :
ComboBox1.AutoCompleteMode = AutoCompleteMode.SuggestAppend
(28-03-20, 04:43 PM)ابراهيم ايبو كتب : [ -> ]السلام عليكم اخي الكريم
انت لاتحتاج الى ماذكرت في ان تأخذ جملة الاستعلام من مربع نص
انت تحتاج الى تكملة تلقائية بمجرد ان تكتب في الكومبو حرفا يظهر لك قائمة واقتراح حسب الاحرف التي كتبتها
وهذه تسمى AutoComplete عدل الخاصية او بالكود هكذا
كود :
ComboBox1.AutoCompleteMode = AutoCompleteMode.SuggestAppend
أستاذ إبراهيم يبدو إنك مافهمت قصدي
انا لا احتاج جملة تكمله تلقائية للكومبو
انا أحتاج جملة البحث لتبحث عن مثلا الموظفين الذين تبدأ اسمائهم بحرف معين يتم أختياره من كومبو بوكس عناصره هي الحروف الأبجدية من الألف للياء
والنتائج تعرض كاملة داخل كومبو بكس أخر يتم من خلالها إستعراضها بالكامل بشرط أن ياتي أسم إبراهيم عند إستعراض نتيجة البحث قبل إسم أحمد تريباً أبجديا وهكذا
أتمنى تكون وضحت الفكره
وجدا شاكر لك اخي الكريم
السلام عليكم
تعديل بسيط عل كود الاخ boudyonline جزاه الله خيرا فقط اضافة % قبل هكذا
كود :
da = New SqlDataAdapter("Select * From MovTable where NameOfMov like '%" & AlphaCB.Text & "%' order by NameOfMov " , sqlcon)
(28-03-20, 05:05 PM)boudyonline كتب : [ -> ]
كود :
da = New SqlDataAdapter("Select * From MovTable where NameOfMov like '" & AlphaCB.Text & "%' order by NameOfMov " , sqlcon)
شكرا لك عزيزي هذا هو التعديل المطلوب مئه في المئه
نفع الله بعلمك وبارك الله فيك
(28-03-20, 06:01 PM)ابراهيم ايبو كتب : [ -> ]السلام عليكم
تعديل بسيط عل كود الاخ boudyonline جزاه الله خيرا فقط اضافة % قبل هكذا
كود :
da = New SqlDataAdapter("Select * From MovTable where NameOfMov like '%" & AlphaCB.Text & "%' order by NameOfMov " , sqlcon)
الأخ إبراهيم جدا اشكرك عزيزي على تواجدك وتجاوبك
ولكن إذا وضعت علامة % كما ذكرت ستختلف نتيجة البحث
لأن المطلوب هو الأسماء التي تبدأ بالحرف المطلوب في البحث
فالكود بتعديل الأخ boudyonline سليم مئه في المئه من ناحية المطلوب في السؤال
شكرا لكم جميعاً