DtSetBO = New System.Data.DataSet MyCommandBO.Fill(DtSetBO) Dim BOTable As DataTable = DtSetBO.Tables("InvtDetailTbl") Dim query = From InvtDetailTbl In BOTable.AsEnumerable() Where InvtDetailTbl.Field(Of String)("Product Line") <> "" Order By InvtDetailTbl.Field(Of String)("MES Product") Ascending, InvtDetailTbl.Field(Of Integer)("Received Date Ageing") Descending Select InvtDetailTbl Dim sortedInvt As DataTable = query.CopyToDataTable() Dim view As DataView = New DataView(sortedInvt) Dim sortedInvtQuery = From rowView As DataRowView In view Select rowView DataGridView1.DataSource = sortedInvtQuery.ToList()
<big></big>InvtDetailTbl.Field(Of DOUBLE)("Received Date Ageing") Descending Select InvtDetailTbl
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)