如何能够在Datagridview中ComboBox类型的单元格中输入数据?

看了很多文章,大部分都是重写ComboBoxCell,下面是一个不错的方法,在园子里看到的贴子,有兴趣的朋友可以找一下原帖.

默认情况下，DataGridViewComboBoxCell不接受用户的输入值。但有时确实有向ComboxBox输入数据的需要。实现这个功能，你需要做两件事。一是将ComboBox编辑控件的DropDownStyle属性设置为DropDown，使用户可以进行输入(否则只能进行选择)；二是确保用户输入的值能够添加到ComboBox的Items集合。这是因为ComboBoxCell的值必须在Items集合中，否则会触发DataError事件，而适合添加新值到Items集合的地方是CellValidating事件处理函数:

代码

Private Sub dataGridView1_CellValidating(ByVal sender As Object, ByVal e As DataGridViewCellValidatingEventArgs) Handles DataGridView1.CellValidating

If e.ColumnIndex = Column1.DisplayIndex Then
'Column1是Combobox列的列名

If Not Me.Column1.Items.Contains(e.FormattedValue) Then

Me.Column1.Items.Add(e.FormattedValue)

End If

DataGridView1.Rows(e.RowIndex).Cells(e.ColumnIndex).Value = e.FormattedValue '这行是我后来加的,因为好像进行上面的操作后单格的值就会丢失.期待更好的办法.
End If
End Sub

Private Sub dataGridView1_EditingControlShowing(ByVal sender As Object, ByVal e As DataGridViewEditingControlShowingEventArgs) Handles DataGridView1.EditingControlShowing

If Me.DataGridView1.CurrentCellAddress.X = Column1.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