SharePoint Web Part Default Interfaces: Listing 2.

Binding a DataView to a DataGrid.

Protected Overrides Sub CreateChildControls()
   Dim dg As New DataGrid
   Controls.Add(dg)
   Dim lt As New Literal
   lt.Text = "Average complete: "
   Controls.Add(lt)
   Dim lb As New Label
   Controls.Add(lb)
End Sub

Dim _dv As DataView
Public Sub MyCallbackMethod(dv As DataView)
   _dv = dv
   Dim dg As DataGrid
   dg = CType(Controls(0), DataGrid)
   dg.DataSource = dv
   dg.DataBind()
End Sub

About the Author

Peter Vogel is a system architect and principal in PH&V Information Services. PH&V provides full-stack consulting from UX design through object modeling to database design. Peter tweets about his VSM columns with the hashtag #vogelarticles. His blog posts on user experience design can be found at http://blog.learningtree.com/tag/ui/.