如果在文本文件中顺序存储了这样一个数组我该怎么做那
1
2
3
4
5
.
.
.
.
student
我想把上面的整数读取到一个数组中当读取到student 这个字符串时就跳出来，用ubound()函数怎么做，

我在等啊，各位能回答一下我的问题吗？谢谢了！

你只需要做个循环用Eof函数来判断你的文件是否到尾..没有的话..就Input一个数到一个数组里.....

我想你是没明白我的意思，我不知道该怎样才能说清我的意思

直接判断数组中的行号,如果是  student 就跳出来...

你看我这样写行不行但是我不知道该怎么跳出来，你能帮我把代码补充一下吗？
声明部分：
dim i as integer
dim s1() as integer
过程部分：
redim s1(1 to 1) as integer
open "C:\ok.txt" for input as #1
do until eof(1)
for i=1 to ubound(s1)
input #1,s1(i)
next i
loop
我不知道在遇到student 这个标识符时该怎么跳出来，如果你在线的话能帮我尽快解决这个问题吗？我在线等着不然我明天就没法交差了，谢谢了！

直接IF 标识符=你想的东东 THEN
EXIT FOR
END IF

我已经做出来了，谢谢了！

学习