怎么给DataGridView中的ComboBox控件赋值

如何给DataGridView中的ComboBox控件赋值？
Dim cmd As New sqlcommand(getTypeString,sqlconn)
Dim m_Adaper As New SqlDataAdapter(cmd)
Dim dt As New DataTable
m_Adaper.Fill(dt)
我在DataGridView第一列中添加了ComboBox，现在想在这个窗体打开时，将dt的值赋给ComboBox，得怎么写代码？


[解决办法]

VB.NET code

'假设DataGridView有两列，第一列是DataGridViewTextBoxColumn格式，第二列是DataGridViewComboBoxColumn格式'先循环给第一列赋值For Each dr As DataRow In ds.Tables(0).Rowsdim str as string = dr.Item("字段名").ToString.TrimMe.dgv.Rows.Add(str )Next'给第二列col2赋值For i As Integer = 0 To Me.dgv.Rows.Count - 1Dim col As New System.Windows.Forms.DataGridViewComboBoxCellMe.dgv.Rows(i).Cells("col2") = coldim str as string = Me.dgv.Rows(i).Cells("col1").Value.ToString.Trim'根据第一列的值获取datasetdim ds as dataset = d.getdata(str)'绑定数据源With col.DataSource = ds .Tables(0).DisplayMember = "字段名".ValueMember = "字段名"End With