借 DataView 去 Sort DataTable 上 指定 Columns

 

   借 DataView 去 Sort DataTable 上 指定 Columns
 
   Private Sub DataViewSort()
 
      Dim Col1 As New DataColumn("Column 1", GetType(Integer))
      Dim Col2 As New DataColumn("Column 2", GetType(Integer))
      Dim Col3 As New DataColumn("Column 3", GetType(Integer))
      Dim Col4 As New DataColumn("Column 4", GetType(Integer))
      Dim Col5 As New DataColumn("Column 5", GetType(Integer))
      Dim DT As New DataTable
      Dim DV As New DataView(DT)
 
      DT.Columns.Add(Col1)
      DT.Columns.Add(Col2)
      DT.Columns.Add(Col3)
      DT.Columns.Add(Col4)
      DT.Columns.Add(Col5)
 
      '………………
      ' Data Processing
      '………………
 
      DV.Sort = "Column 1"
      DataGridView1.DataSource = DV
 
   End Sub