[VBA]求助，多谢大家！！

dandandan · 发表于 2005-6-10 15:04:00

小妹有一事相求：如下有一文本文件的一部分，我想提取10，20，30后面的数据，并令存在一数组中，请问如何实现？
10
77.95818787889311
20
86.67726674893243
30
0.0
11
77.95818787889311
21
40.32671441750705
31
0.0

wyj7485 · 发表于 2005-6-10 16:43:00

打开文件计算文件长度,定义一个动态数组,把要的数据放到里面

dyheng · 发表于 2005-6-10 17:40:00

如果数据不太多的话，先定义一个数组A1，把文本文件中的字符串逐行写入数组中，然后再定义另一个双精数组A2，在数组A1中循环读数，遇到想找的数（如10，其在A1中的位置假设是2）后，就把A1（3）（即数组中下一值）赋给A2（0），如此循环下去，直到数组读完为。但是如果文本文件太大的话，这个就不太好用了，一是要写很多代码（逐条件判断），二是速度也会下降。

[VBA]求助，多谢大家！！

发表回复

精选推荐