这是如何从DataColumn中检索列名:
MyDataTable.Columns(1).ColumnName
Dim name(DT.Columns.Count) As String Dim i As Integer = 0 For Each column As DataColumn In DT.Columns name(i) = column.ColumnName i += 1 Next
参考