VB 读取data.txt文件中2列数据到数组a(i),b(i),急,在线等!!!
VB 读取data.txt文件中2列数据到数组a(i),b(i),急,在线等!!!
日期:2009-10-27 16:51:14 人气:2
那就给你第一部分的吧
Dim a(), b(), n As Long
Open "d:\data.txt" For Input As #1
n = 0
While Not EOF(1)
n = 1
Line Input #1, aa
ReDim a(n)
ReDim b(n)
a(n) = Trim(Mid(aa, 1, InStr(aa, " ")))
b(n) = Tri