【机房收费系统——导入Excel】

         在机房收费系统中vb与EXCEL的交换应该算是一个新的知识，之前我们在做学生的时候没有接触过，但是这个EXCEL的导出相对上一篇的报表而言那应该是很简单的了。在此篇博客中将介绍两种方法进行EXCEL的导出。

   准备：

       我们要想让vb与EXCEL交互成功，我们必须保证电脑上面已经安装office，再就是我们需要做的一件事情就是：工程——属性——Microsoft Excel 14.0 Object Library.

  方法一：

       通常是我们大家都非常喜欢的一种就是，那个窗体需要，我就在那个窗体编写代码，在第二个窗体需要的时候我们就直接复制  粘贴过去，看到满满的一整个窗体的代码感觉很自豪（我也是这么做的但是被师傅指点了），下面介绍这种方法的代码：

   

    Dim xlsapp As Excel.Application
    Dim xlsbook As Excel.Workbook
    Dim xlssheet As Excel.Worksheet
    Dim i, j As Long
    Dim mrc As ADODB.Recordset
    Dim txtSQL As String
    Dim MsgText As String
    
    Set xlsapp = CreateO