datatable 的妙用

        Dim dt As DataTable = ViewState("datasource")

        Dim source As New DataTable
        source = dt.Clone

        For i As Integer = (index - 1) * pagesize To index * pagesize - 1
            If dt.Rows(i) IsNot Nothing Then

                source.ImportRow(dt.Rows(i))

            Else
                Exit For
            End If
        Next

 

这样就能取到某几行数据了，十分强大