在VB中引入Excel数据

在VB.net中引入Excel数据.在项目中添加引用MicrosoftExcel

12.0ObjectLibrary.在程序种引用命名空间ImportsMicrosoft.Office.Interop.定义公共变量DimxlAppAsExcel.ApplicationDimxlBookAsExcel.WorkbookDimxlSheetAsExcel.Worksheet.写程序获取Excel数据xlApp=NewExcel.ApplicationxlBook=xlApp.Workbooks.OpenD:\SwVBAddinl\SwVBAddinl\Bookl.xlsxxlApp.Visible=FalsexlSheet=xlBook.Worksheets.ltemlxlSheet.ActivateDimExcelDataAsDoubleExcelData=xlSheet.Cellsll.Value.清理代码xlBook.SavexlBook.ClosedxlApp.Quit。