Visual Basic .NET程序设计教程上机指导及习题解答 第2版 刘瑞新 第12章 数据的导入和报表输出新.pptVIP

第12章 数据的导入和报表输出 12.1 Visual Studio与Excel电子表格 12.1 Visual Studio与Excel电子表格 12.1 Visual Studio与Excel电子表格 12.1 Visual Studio与Excel电子表格 12.1 Visual Studio与Excel电子表格 12.1 Visual Studio与Excel电子表格 12.1 Visual Studio与Excel电子表格 12.1 Visual Studio与Excel电子表格 12.1 Visual Studio与Excel电子表格 12.1 Visual Studio与Excel电子表格 12.1 Visual Studio与Excel电子表格 12.1 Visual Studio与Excel电子表格 12.2 使用Excel输出报表实例 * 本章讲述的主要内容 12.1 Visual Studio与Excel电子表格 12.2 使用Excel输出报表实例 12.1.1 操作Excel工作簿 1. 引用Excel类库 应使用下列语句在项目中添加对该命名空间的引用。 Imports Microsoft.Office.Interop.Excel 12.1.1 操作Excel工作簿 2. 打开现有Excel文件 在Visual Studio中打开现有Excel文件的操作步骤如下。 1) 添加对Excel类库的引用。这一步是在Visual Studio中操作Excel文件的必须，今后不再赘述。 2) 声明一个ApplicationClass类对象。该类中包含有众多用于Excel文件操作的属性、方法和事件。如，打开、关闭、保存等。 3) 声明一个Workbook类对象，而后调用ApplicationClass的子类Workbooks的Open方法将打开的Excel工作簿赋值给Workbook对象。在使用Open方法时，需要为其指定15个参数，各参数的说明见教材表12-1。 12.1.1 操作Excel工作簿 3. 保存或另存Excel文件 使用Workbook对象的Save方法或SaveAs方法可以保存或另存Excel文件。 Save方法不带任何参数，表示保存Workbook对象代表的文件，相当于在Excel环境中单击“保存”按钮或执行“文件”菜单下的“保存”命令。 SaveAs方法带有12个参数，各参数的说明见教材表12-2。 12.1.1 操作Excel工作簿 4. 释放Excel对象 操作完毕后通常使用如下所示的代码释放Excel对象： ExcelApp.Quit()：ExcelApp = Nothing：ExcelBook = Nothing ExcelSheet = Nothing 使用下列代码强制终止当前内存中存在的Excel进程。 Dim procs() As Process = process.GetProcessesByName(Excel) For Each pro As Process In procs pro.Kill() Next GC.Collect() 12.1.2 操作Excel工作表 1. 指定要操作的工作表 指定要操作的工作表通常可以通过以下3种方式来实现： 操作当前工作表 Dim ExcelSheet As Worksheet =ExcelApp.ActiveSheet 操作Excel工作簿中的第1个工作表 Dim ExcelSheet As Worksheet = ExcelBook.Worksheets(1) 操作工作簿中名为“abc”的工作表 Dim ExcelSheet As Worksheet = ExcelBook.Worksheets(abc) 12.1.2 操作Excel工作表 2. 向工作表中写入数据 例如，下列代码将字符串“abc”写到当前工作表的D3单元格中： …… 创建Excel工作表对象 为工作表的第3行第4列单元格（D3）赋值 ExcelSheet.Cells(3, 4) = abc 不显示保存文件提示信息框 ExcelApp.DisplayAlerts = False ExcelBook.Save() 保存工作簿 ExcelApp.Quit() 12.1.2 操作Excel工作表 3. 向工作表中插入图片 使用Worksheet的子类Shapes的AddPicture方法可以向工作表的指定位置插入一个图片。AddPicture方法带有7个参数，各参数的含义说明见表12-2。 12.1.2 操作Excel工作表 4. 读