作者sendohmadonn (Chiu)
看板Visual_Basic
标题[.NET] 请问如何将txt档读入二维矩阵里?
时间Sun Sep 19 01:18:42 2010
请输入专案类型(网站专案或者应用程式专案):应用程式专案
请教各位高手, 小弟有一个资料量颇大的txt档, 栏位数固定, 但是列数不定, 例如下例
2001/1/2,上午 08:46:00,4702,4719,4700,4703,77
2001/1/2,上午 08:47:00,4718,4729,4715,4723,23
2001/1/2,上午 08:48:00,4744,4744,4729,4730,26
2001/1/2,上午 08:49:00,4738,4740,4735,4735,22
2001/1/2,上午 08:50:00,4733,4733,4729,4729,21
2001/1/2,上午 08:51:00,4730,4732,4730,4732,20
2001/1/2,上午 08:52:00,4732,4738,4732,4738,23
2001/1/2,上午 08:53:00,4737,4740,4737,4738,14
.... 约一万笔
我用教科书的范例(他只有三笔)的程式码 改
会出现 "资料会超过阵列索引值" 请问要怎麽修改?
程式码如下:
Dim future()
Dim sr As New IO.StreamReader("D:\DATA\data.txt")
Dim count As Integer = 1
While Not sr.EndOfStream
Dim str = sr.ReadLine
Dim tmp = Split(str, ", ")
future(count - 1) = tmp
count += 1
End While
For i As Integer = 0 To 6
For j As Integer = 0 To 10000
txtOutput.Text &= future(i)(j) & " "
Next
Next
後来上网找答案 程式设计师俱乐部 有类似的问题
http://www.programmer-club.com.tw/ShowSameTitleN/vbdotnet/14426.html
可是我修改的还是跑不出来...:(
请大大指点一下...thx...
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 220.139.146.79
※ 编辑: sendohmadonn 来自: 220.139.146.79 (09/19 01:21)
1F:→ horngsh:不定数量的资料,可改用ArrayList or List<T>,用ADD()方法y 09/19 09:55