请问高手，怎么动态给DataGrid，添加模板列，或绑定列，怎么把绑定列的值取出，请给出代码好吗？

Question

Dim ds As DataSet
        Dim i As Integer
        Dim column_name As String
        Dim column_title As String
        ds = Session("nowdataset")
        For i = 0 To ds.Tables("nowtable").Columns.Count - 1
            column_name = ds.Tables("nowtable").Columns(i).ColumnName
            '取得dataset中表的每个字段的名字和title
            column_title = ds.Tables("nowtable").Columns(i).Caption
            Dim newcolumn As New BoundColumn                         
            '定义一个绑定控件   
            newcolumn.DataField = column_name                       
            '设置绑定控件的数据源，字段名
            newcolumn.HeaderText = column_title                     
            '设置绑定控件的标题
            DataGrid1.Columns.Add(newcolumn)         
           '向datagrid中添加一列    
        Next
        DataGrid1.DataKeyField = ds.Tables("nowtable").Columns(0).ColumnName  
        '设置表格的关键数据datakeyfield
        DataGrid1.Columns(2).Visible = False                                
        '使表格第三列不可见，该列为keyfield   
        DataGrid1.DataSource = ds.Tables("nowtable").DefaultView
        DataGrid1.DataBind()

Answer 1

直观点:用DataGrid的属性生成器..很快就出来了

Answer 2

Dim newcolumn As New BoundColumn                         
            '定义一个绑定控件   
            newcolumn.DataField = column_name                       
            '设置绑定控件的数据源，字段名
            newcolumn.HeaderText = column_title                     
            '设置绑定控件的标题
            DataGrid1.Columns.Add(newcolumn)

Answer 3

楼主该给 bluejs(bluejs) 分了