长代码问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

数组不能那样用。不如这样：

Dim s As String = "部门, 福利待遇满意度_得分, 福利待遇满意度_份数, 福利待遇满意度_平均分, 个人成长满意度_得分, 个人成长满意度_份数,"

s += "个人成长满意度_平均分, 工作环境满意度_得分, 工作环境满意度_份数,工作环境满意度_平均分, 管理状况满意度_得分, 管理状况满意度_份数,"

s += "管理状况满意度_平均分, 设备设施满意度_得分, 设备设施满意度_份数, 设备设施满意度_平均分"

Dim dCols() As String = s.Split (",")

主题：长代码问题