2024-01-06 16:51
admindim strline as stringdim a()dim i as integeropen app.path +"\1.txt for input as #1do until eof(#1)i=i+1line input #1,strlineredim preserve a(i)a(i-1)=strlineloop
顶一下
(0)
0%
踩一下
(0)
0%
- 相关评论
- 我要评论
-
上一篇：返回栏目
dim strline as stringdim a()dim i as integeropen app.path +"\1.txt for input as #1do until eof(#1)i=i+1line input #1,strlineredim preserve a(i)a(i-1)=strlineloop
301
301
300
300
300
300
300
300
300
300