منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
كيف يمكن تعديل كموبوكس داخل داتا جريد - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : كيف يمكن تعديل كموبوكس داخل داتا جريد (/showthread.php?tid=20000)

كيف يمكن تعديل كموبوكس داخل داتا جريد - كفاح - 14-04-17

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

كود اضافة الكمبوبكس في داتا جريد
PHP كود :
   Dim colProductIdCombo As New System.Windows.Forms.DataGridViewComboBoxColumn()
colProductIdCombo.DataSource = ds.Tables("Books")
        colProductIdCombo.DisplayMember = "BookName"
        colProductIdCombo.ValueMember = "IdBook"
        colProductIdCombo.DataPropertyName = "BookId"
        colProductIdCombo.HeaderText = "الاصنـــــــاف"
        colProductIdCombo.Width = 100
        colProductIdCombo.DisplayStyle = DataGridViewComboBoxDisplayStyle.Nothing
        colProductIdCombo.ReadOnly = False

        ' colProductIdCombo.DisplayStyle = DataGridViewComboBoxDisplayStyle.ComboBox
        DataGridView1.Columns.Add(colProductIdCombo) 

وهذا كود تعديل البيان فى الكومبوبكس لكن يعطي خطا اثناء التشغيل

PHP كود :
Private Sub DataGridView1_EditingControlShowing(sender As Object, e As DataGridViewEditingControlShowingEventArgs) Handles DataGridView1.EditingControlShowing
       If DataGridView1.CurrentCellAddress.X = colProductIdCombo.DisplayIndex Then
            Dim cb As ComboBox = TryCast(e.Control, ComboBox)
            If cb IsNot Nothing Then
                cb.DropDownStyle = ComboBoxStyle.DropDown
            End If
        End If

    End Sub 

PHP كود :
  Private Sub DataGridView1_CellValidating(sender As Object, e As DataGridViewCellValidatingEventArgs) Handles DataGridView1.CellValidating


        If DataGridView1.CurrentCellAddress.X = colProductIdCombo.DisplayIndex Then
                If Not colProductIdCombo.Items.Contains(e.FormattedValue) Then
                    colProductIdCombo.Items.Add(e.FormattedValue)
                End If
            End If
    End Sub 

المطلوب فتح امكانية التعديل لعمل تصفية للبيانات الموجودة فى الكمبوبوكس ولكم جزيل الشكر