如何把 Excel 中的数据表导入到VB中的 listview 控件

来源：百度知道 编辑：UC知道 时间：2024/06/02 17:13:28
如何把 Excel 中的数据表导入到VB中的 listview 控件中并显示出来

代码怎么写啊..没有头绪...
可否讲得再详细一点..具体代码是什么?这个代码好像不太符合要求的..麻烦了.

看下它的扩展名对么?

先把Excel中的数据导入到dataTable里面，然后使 listView的 dataSource属性=该 datatable.
怎么把Excel里的数据导入到 dataTable 中，网上有很多介绍。
我最近刚写了一个，你可以参考参考。直接copy过来的，没有加工冗余信息。
Public Function ReadExcel(ByVal fileName As String) As DataTable

Dim oXLApp As Excel.Application
Dim oXLBook As Excel.Workbook
Dim oXLSheet As Excel.Worksheet

oXLApp = New Excel.Application
oXLBook = oXLApp.Workbooks.Open(fileName)

'oXLBook.Activate()
'oXLSheet = oXLBook.Application.Worksheets.Item(1)
'oXLSheet.Activate()
oXLSheet = oXLBook.ActiveSheet

Dim dt As New DataTable

Dim dc As DataColumn

dc = New DataColumn
dc.ColumnName = "订单编号"
dt.Columns.Add(dc)

dc = New DataColumn
dc.ColumnName = "起运地"
dt.Columns.Add(dc)

dc = New DataColumn
dc.ColumnName = "目的地"
dt.Columns.Add(dc)

dc = New DataCol