[سعود]

تعديل كود الحذف [خطأ فادح بالكود الاول]

PHP كود :

If Not IsNothing(DataGridView1.CurrentRow) Then
            Dim rowindex As Integer = DataGridView1.CurrentRow.Index
            Dim col3 As DataGridViewComboBoxCell = DirectCast(DataGridView1.Rows(rowindex).Cells(0), DataGridViewComboBoxCell)
            For i As Integer = 0 To col3.Items.Count - 1
                Dim cv As String = col3.Items(i).ToString
                If cv = "B" Then
                    col3.Items.Remove(cv)
                    Exit Sub
                End If
            Next
        Else
            MsgBox("Nothing")
        End If 


---

و كذلك كود الاضافة:

PHP كود :

If Not IsNothing(Me.DataGridView1.CurrentRow) Then
            Dim rowindex As Integer = DataGridView1.CurrentRow.Index
            Dim col3 As DataGridViewComboBoxCell = DirectCast(DataGridView1.Rows(rowindex).Cells(0), DataGridViewComboBoxCell)
            col3.Items.Add("F")
        End If