我用VB做一个循环建立文档的程序,可是建立了512个就不行了

来源:百度知道 编辑:UC知道 时间:2024/05/03 06:01:08
Dim filename As String
For i = 1 To 2000
filename = "E:\bott" & i & ".txt"
Open filename For Output As #i
Print #i, "这里写入文件内容"
Close #i
Next i
可是程序运行只建立512个文件就停了,老是说:实时错误‘52',错误的文件名或号码.调试就停在:Open filename For Output As #i
为什么????????????
望高手解答
"都用#1",是的,问题解决了,可还是不明白,能解释一下吗,谢谢拉.另外BAIDU知道上有人说用以上程序在FAT32磁盘格式只能建立17944个文件,然后就报错,必须把FAT32改为NTFS,是吗,如何解决.另外rarnu大哥,怎么进你的群阿。

文件号超出了
实际上你都用#1就行
没必要把文件号弄得太复杂

同楼上,把文件号改成由系统决定即可
fileno=freefile
open ... as #fileno
print #fileno, ...
close #fileno

#i的i和i=1 to。。。。 的i没有任何关系
所以#1完全可以