怎么循环读取DAT中的数据放入一维数组

我的DAT文件中只有一列但是有2000行的数，格式是：
10.000
10.000
10.000
.
.
.
10.000
我想把这两千个数放入一个数组中应该怎么做啊，能给个具体代码么 谢谢   --------------------编程问答-------------------- 如果只有 2000 行的话，可以用 Binary 方式一次读入，转成字符串后按回车换行符 Slip 成数组。不过此时仍是字符串，要转换成数字的话，还要再逐个求值。 --------------------编程问答-------------------- --------------------编程问答--------------------

引用 2 楼  的回复:

Dim strTmp As String, strLine() As String, bytBuff() As Byte
Dim sngData() As Single, i As Long

Open APP.Path & "/test.dat" For Binary As #1
Redim bytBuff(LOF(1) - 1)
Get #1, bytBuff
Close ……

您好 谢谢哈  我暂时只有2000个数  但是我是用作数据采集的 就说以后存放在dat文件里的数应该远不止这么多呢该怎么办啊 --------------------编程问答-------------------- 如果“远不止”的话，就不要用字符串处理存到数组了。

可以将你的文本文件当作 ADO 的外部数据库表来访问。
--------------------编程问答--------------------

引用 4 楼  的回复:

如果“远不止”的话，就不要用字符串处理存到数组了。

可以将你的文本文件当作 ADO 的外部数据库表来访问。

请问这部分知识我在那里可以学习相关啊  小白刚起步 谢谢哈

补充：VB ,  基础类