将数据表中的列从第一个移动到最后一个答案

【问题标题】：Moving a column in a datatable from first to last将数据表中的列从第一个移动到最后一个
【发布时间】：2011-12-08 11:24:29
【问题描述】：

我有一个 sql 存储过程，它在我的数据表中返回一组特定的列。
在将数据表导出到 excel 之前，如何将第一个位置的列移动（比方说）到最后一个位置？

Dim myConn As New SqlConnection(strConnection)
Dim myCmd As New SqlCommand(strSQL, myConn)
Dim dt As DataTable = New DataTable()
Dim da As SqlDataAdapter = New SqlDataAdapter(strSQL, myConn)
da.Fill(dt)

Dim excelPackage = New OfficeOpenXml.ExcelPackage
Dim excelWorksheet = excelPackage.Workbook.Worksheets.Add("ProjectStatusReports")
excelWorksheet.Cells("A3").LoadFromDataTable(dt, True)

【问题讨论】：

你只想交换第一列和最后一列的位置都可以吗？
好吧....我基本上想重新排列列位置

标签： vb.net datatable

【解决方案1】：

这会将DataTable 中第一列的位置更改为最后一列：

dt.Columns(0).SetOrdinal(dt.Columns.Count - 1)

http://msdn.microsoft.com/en-us/library/system.data.datacolumn.setordinal.aspx
http://msdn.microsoft.com/en-us/magazine/cc163495.aspx（搜索SetOrdinal）

被寻址的序数位置之前的列都减一槽，为位置的变化腾出空间。

【讨论】：