Datagrid Datalist

har løst denne ved at vende mit grid:

Public Function FlipDataSet(ByVal my_DataSet As DataSet) As DataSet
        Dim ds As DataSet = New DataSet()
        Dim dt As DataTable = New DataTable()
        For Each dt In my_DataSet.Tables
            Dim table As DataTable = New DataTable()
            Dim i As Integer = 0
              While i <= dt.Rows.Count
                table.Columns.Add(Convert.ToString(i) + "test")
                System.Math.Min(System.Threading.Interlocked.Increment(i), i - 1)
            End While
            Dim r As DataRow = Nothing
            Dim k As Integer = 0
            While k < dt.Columns.Count
                r = table.NewRow
                r(0) = dt.Columns(k).ToString
                Dim j As Integer = 1
                While j <= dt.Rows.Count
                    r(j) = dt.Rows(j - 1)(k)
                    System.Math.Min(System.Threading.Interlocked.Increment(j), j - 1)
                End While
                table.Rows.Add(r)
                System.Math.Min(System.Threading.Interlocked.Increment(k), k - 1)
            End While
            ds.Tables.Add(table)
        Next
        Return ds
    End Function

Hvor og hvordan kalder du egentligt denne funktion?

Det kan du bare gøre der hvor du vil f.eks lige inden du binder på et grid:

Dim new_objDS As DataSet = FlipDataSet(objDS)
Dim my_DataView As DataView = new_objDS.Tables(0).DefaultView
DG1.DataSource = my_DataView
DG1.DataBind()