动态创建DataView和列

Code
Code
 
'建立一个 GridView 对象并设定其相关属性。
  Dim gv As GridView = New GridView()

  gv.ID 
= "PieChartGridView"

  gv.AutoGenerateColumns 
= False

  gv.AllowSorting 
= True
  gv.AllowPaging 
= True
  gv.PageSize 
= 2

  
' 建立一个 BoundField 数据行。
  Dim myDepartmentField As BoundField = New BoundField()
  myDepartmentField.HeaderText 
= "部门"
  myDepartmentField.DataField 
= "部门"

  
' 建立一个 ImageField 数据行。
  Dim myPieChartField As ImageField = New ImageField()
  myPieChartField.HeaderText 
= "圆饼图"
  myPieChartField.DataImageUrlField 
= "部门编码"
  …

  
' 将自订的数据行加入 Columns 集合中。
  gv.Columns.Add(myDepartmentField)
  gv.Columns.Add(myPieChartField)
posted @ 2009-06-04 15:32  db's jim  阅读(223)  评论(0编辑  收藏  举报