[b]txt文档，有一百万行（例子中只有十多行），求每行和值，将相同和值数量导出到excel表格中。（用公式做太费时间，希望用VB编个小程序，VB源码最好能有解释，计算其它数据时，我就能自己改了）
十分感谢！！！！
[local]2[/local][/b]

我发的附件怎么没有了？

无脑求作业我们并不欢迎。请你自己先思考一下。

实在是想不出，还可以参考我们提供的算法。

先定义数据保存数组，从21到177，或者从 1到 177
TXT ，按行读，使用 split 分解得各个数，然后求各，根据结果，将对应的数组的计数值加1

最后，把计数结果，一行一行的添加到EXCEL中，结果为0的不添加。

这种的话，我建议是不要用VB了，直接导入数据库，通过SQL做方便的多