combox绑定到 datagrid 中指定列
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
GetApplicationInfo()
End Sub
Private Function GetApplicationInfo()
Dim SqlString As String = "Select application_no '申请编号 ',division '部门 ' from application where co_code= 'IDF ' "
dts = New DataSet()
conn = New SqlConnection(ConnString)
da = New SqlDataAdapter(SqlString, conn)
da.Fill(dts, "Application ")
Dim dtb As DataTable = New DataTable( "Application ")
dtb = dts.Tables( "Application ")
DataGrid2.DataSource = dtb
'da.Dispose()
End Function
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim myCell As DataGridCell
myCell = DataGrid2.CurrentCell
Dim myTable As DataTable
myTable = CType(DataGrid2.DataSource, DataTable)
'
Dim myGridStype As DataGridTableStyle = New DataGridTableStyle()
myGridStype.MappingName = myTable.TableName
Dim colStype2 As DataGridColumnStyle = New DataGridTextBoxColumn()
colStype2.MappingName = "部门 "
colStype2.HeaderText = "部门 "
myGridStype.GridColumnStyles.Add(colStype2)
'
DataGrid2.TableStyles.Clear()
DataGrid2.TableStyles.Add(myGridStype)
'
Dim _division As String = "select division from division where co_code= 'IDF ' "
Dim rd As SqlDataReader
Dim _com As SqlCommand
'
Dim dBoxColumn As DataGridTextBoxColumn = New DataGridTextBoxColumn()
conn = New SqlConnection(ConnString)
_com = New SqlCommand(_division, conn)
conn.Open()
rd = _com.ExecuteReader()
dBoxColumn = DataGrid2.TableStyles(0).GridColumnStyles(0)
'
ComboBox1 = New ComboBox()
ComboBox1.DropDownStyle = ComboBoxStyle.DropDownList
ComboBox1.Dock = DockStyle.Fill
While rd.Read()
ComboBox1.Items.Add(rd( "division ".ToString))
End While
rd.Close()
conn.Dispose()
dBoxColumn.TextBox.Controls.Add(ComboBox1)
End Sub
为什么执行Button3_Click进行绑定后， '申请编号 '这一列数据就不显示，只剩下一列了呢？？
[解决办法]
COMBOXCOLUMN
[解决办法]
dBoxColumn.TextBox.Controls.Add(ComboBox1)
盖了原来的那一列
