Question

vb里如何用变量来反映文件名？

现在有10个文件，分别是1.txt、2.txt、3.txt...10.txt，变量i的取值为1~10 ，如何写语法，使得当i取不同的值时分别读取相应的文件，比如，当i=5时，打开5.txt文件。

Answer 1

for i=1 to 10
filename=i & ".txt" '也可以加上绝对路径比如 filename="d:\txt\" & i & ".txt"
readfile(filename) '这里假设readfile为读取文件的自定义函数，可修改成你自己的读取文件的语句
next

追问

谢谢！另外请帮我看下如下代码哪里有问题，我的要求是生成10个不重复的随机数，但是目的没有达到，有重复的。

追答

你是按一次按钮生成一个随机数么，是的话有3个错误：
1、数组 a 需要与n一样定义为Static（或者定义为全局变量），不然每次click 数组a都初始化为0了，也就比较不出重复的。
2、j=0放到do循环里面去，每次循环前赋值为0
3、if j=0 then exit do 要放到next i 后面，等到与数组中所有数都比较完了，才能知道是否没有重复。
另外可以稍微改进一下，不需要j，直接根据for循环结束后i的值来判定，if i>n then exit do (如果都没有重复的话 i最后应该等于n+1

Answer 2

问题太高深，不会。