声明

 1  Public Type TypeValueColum
 2     '列索引号
 3     columnIndex As Integer
 4     '列名称
 5     columnName As String
 6     '对应字典列索引。没有字典对应时为0
 7     dicColumnIndex As Integer
 8     '对应字典列索引。没有字典对应时为空
 9     dicColumnName As String
10  End Type
11  
12   '学校标识码
13  Public xxbsm As String
14      '定义一个结构,描述数据页
15  
16 Public Const valueSheetName As String = "学生基础信息"
17 Public Const dicSheetName As String = "字典"
18 Public Const msgSheetName As String = "错误信息"
19 Public Const readmeSheetName As String = "说明"
20 Public Const excelSheetName As String = "模板信息"
21 '记录总的校验数
22 Public totalCount As Integer
23 '导出记录总数
24 Public exportCount As Integer
25 
26 
27 
28  
29 Public Const dataRowStart As Integer = 2
30 Public curMsgRow As Integer
31 
32 
33 Public Type TypeValueCell
34     '列名称
35     cellName As String
36     '内容
37     cellContent As String
38     '对应导出sheet页导出的列
39     exportColumn As Integer
40     '对应导出sheet页导出的行
41     exportRow As Integer
42 End Type
43 
44 Public Const XsXxSheet As String = "学生基础信息"
45 Public Const XsExportSheet As String = "学生信息打印模板"
46 
47 '是否继续
48 Public notContinueBool As Boolean
原文地址:https://www.cnblogs.com/xiehaofeng/p/11616941.html