DataGrid插入行的问题!!!
Dim mTab as new DataTable("aa")
Sub Fun插入行()
Dim RowNumber As Integer
RowNumber = Me.DataGrid1.CurrentRowIndex
Dim NewRow As DataRow
NewRow = mTab.NewRow
NewRow.Item("名称") = "新插入的行"
mTab.Rows.InsertAt(NewRow, 0)
Me.DataGrid1.SetDataBinding(DataSet, "SWTab")
End Sub
怎么插也是在后面新增一行,怎么解决啊?回答正确给20分。
问题点数:20、回复次数:2Top
1 楼hamadou(闵峰--为了理想而奋斗)回复于 2005-04-18 17:51:27 得分 20
dim table as datatable = ctype(me.datagrid1.datasource,datatable)
dim row as datarow = table.newrow
row("name")="aaa"
row("sex")=false
table.rows.insertat(row,1)
me.datagrid1.datasource = table.copy()Top
2 楼cqhxd()回复于 2005-04-18 18:01:23 得分 0
谢谢 hamadou(闵峰) ,问题已经解决,接分吧!Top




