VB如何从文件读取一个大数组到内存?

[ediex]

Do While Not EOF(1)


For i = 0 To 578
Line Input #1, strdata
tempx = Val("&H" & strdata)
iAdcData(i) = CInt(tempx)



Next i
Call usrGrap'根据数组显示图像点过程


DoEvents



Loop








本程序读取一个数字后显示一个点,现在要加快显示速度,一次读取一批数字然后显示一批点,怎么办?

[可西哥]

用API先全部读进来,相关函数：
fopen,fread,fclose
读进来后是一个byte()
然后再处理。

你579个数据是一个点？
也可以先定义Type，再去读

[ediex]

579个数据显示579个点

[benyfeifei]

你的数据为什么要存成文本格式呢，存储成随机文件或二进制文件不是更好处理吗？

[ediex]

数据量比较大,特别在加载生成的数据文件时

[ediex]

二进制文件不知道怎么处理呀?
有没有类似上面的二进制处理程序?

[zzyong00]

For i = 0 To 578是干什么用的？
你把这层循环去掉不就可以读全部内容了吗？

[ediex]

一次读578个字符呀,文件有几十m,一次读取速度太慢

[行云边]

先把文件数据读取到内存，然后在遍历iAdcData数组调用usrGrap。