Dim oCell As DataGridViewComboBoxCell
DataGridView1.Rows(0).Cells(1) = New DataGridViewComboBoxCell()
oCell = DataGridView1.Rows(0).Cells(1)
oCell.Items.AddRange(strA)
strA为数组
Dim oCell As DataGridViewComboBoxCell
DataGridView1.Rows(0).Cells(1) = New DataGridViewComboBoxCell()
oCell = DataGridView1.Rows(0).Cells(1)
oCell.Items.AddRange(strA)
strA为数组