Vb net操作excel实例.doc

Vb.net操作excel实例 以前做了vb6.0操作excel的实例，后来转换成c#操作excel，再后来又转换成vb.net操作excel，通过比较，同样是运行在。.net环境下，但是vb.net明显要比c#快很多。 我做的是成绩统计软件，一个窗体。俩控件：菜单和打开文件对话框。 子程序目录： 1、算成绩（m）。2、成绩册（m）。3、横排（h，l）。 4、纵排（h，l）。5、单科统计表（m，n）。6、算分栏（h）。 7、单科汇总（i）。8、填数据（m）。9、清数据（m）。 10、上报表（m）。11、工作表命名（）。12、过成绩（m）。 13、打开（）。14、建空表（m）。15、无英语学校汇总（m）。 16、有英语学校汇总（m）。17、计算器。 编码主要分为主程序和子程序两个模块。 注意：要添加引用excel。 Imports System.IO Public Class 统计成绩 Public 调用 = New 子程序() Public 电子表格 As Excel.Application 定义变量 Public 工作簿 As Excel.Workbook Public 工作表 As Excel.Worksheet Public 单元格 As Excel.Range Private Sub 一年级ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 一年级ToolStripMenuItem.Click Call 调用.建空表(10) Call 调用.工作表命名(1) Call 调用.成绩册(1) End Sub Private Sub 二年级ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 二年级ToolStripMenuItem.Click Call 调用.建空表(10) Call 调用.工作表命名(2) Call 调用.成绩册(2) End Sub Private Sub 三年级ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 三年级ToolStripMenuItem.Click Call 调用.建空表(8) Call 调用.工作表命名(3) Call 调用.成绩册(3) End Sub Private Sub 四年级ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 四年级ToolStripMenuItem.Click Call 调用.建空表(8) Call 调用.工作表命名(3) Call 调用.成绩册(3) End Sub Private Sub 五年级ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 五年级ToolStripMenuItem.Click Call 调用.建空表(8) Call 调用.工作表命名(3) Call 调用.成绩册(3) End Sub Private Sub 六年级ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 六年级ToolStripMenuItem.Click Call 调用.建空表(8) Call 调用.工作表命名(3) Call 调用.成绩册(3) End Sub Private Sub 学校总评ToolStripMenuItem_Click(ByVal sender As System.Object, ByV