今天在敲机房收费的时候,关于导出Excel出现了下面的问题,
Option Explicit
Dim mrc As ADODB.Recordset
Dim txtSQL As String
Dim txtMsg As String
Dim TempExcel As Excel.Application '声明一个Excel工作表
Dim TempSheet As Excel.Worksheet '声明一个excel工作簿
Dim TempRow As Integer '定义表格控件中的行数
Dim TempCol As Integer '定义表格控件中的列数
在定义上面的变量时出现了:
其实这个小问题很简单,只是我们不够细心。其实在“引用”中我们少添加了一个部件而已
敲机房收费的时候会遇到好多这样的问题,明明代码没有什么问题但是就是运行不了!!所以我们要细心哦