vb.net ADO快速读取excel

一:写在之前

其实我还在写erlang, vb什么的才和我没关系,要不是为了妹子,才不会看

二:关于vb的看法

感觉vb的资料非常乱,由于时间太久,而且有vb,vb.net的分别,需要花费更多的时间去筛选资料

就比如查找读取excel,查找出大量..2000年多有的资料,简直惨..接口已经变过了..

三:vb 基本的读取excel方法

Dim xlapp As Excel.Application 'Excel对象
Dim xlbook As Excel.Workbook '工作簿
Dim xlsheet As Excel.Worksheet '工作表

Private Sub Excel_Out_Click()
Dim i, j As Integer
Set xlapp = CreateObject("Excel.Application") '创建EXCEL对象
Set xlbook = xlapp.Workbooks.Open(App.Path & "/test.xls") '打开已经存在的test.xls工件簿文件
xlapp.Visible = True '设置EXCEL对象可见（或不可见）
Set xlsheet = xlbook.Worksheets(1) '设置活动工作表''
xlsheet.Cells(i, j) = j   '当前工作簿第一页的第I行第J列

这种方法用