@@@@@@关于txt文件的读取

[gigilee]

Do While Not EOF(1)
Input #FileNum, Aline
tmpdata = Split(Aline, ",")
ReDim Preserve outdata(i + 1)
outdata(i) = tmpdata(0)
i = i + 1
Loop

如果遇到这样的数据如何赋值？

a,b,,d

[飘零风]

tmpdata(0)="a"
tmpdata(1)="b"
tmpdata(2)=""
tmpdata(3)="c"

不过你的程序好像并没有用到tmpdata(1)以后的东西，呵呵。

[ryuginka]

应该可以的

[guxizhw]

split 应该可以

[gigilee]

楼上的，你测试过你的程序嘛？
tmpdata = Split(Aline, ",")
只能读到tmpdata(0)

[飘零风]

????我当然有测试过。

只能读到tmpdata(0)？如果真的是这样的，你一定是把两个逗号写错了，一个写的是全角逗号，一个写的是半角的逗号。