| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1461 人关注过本帖
标题:TXT数据保存到二维数组
只看楼主 加入收藏
pjtyzyq
Rank: 4
等 级:业余侠客
威 望:6
帖 子:232
专家分:240
注 册:2016-2-14
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:3 
TXT数据保存到二维数组
将文件xlrecno.txt内容保存到二维数组a(8,31)中,规则:
a(1,1)=11.....a(1,31)=131
a(2,1)=21.....a(2,31)=231
.
.
a(8,1)=81......a(8,31)=831

PUBLIC array aa(8),bb(8,31)
a1=Filetostr("xlrecno.txt")
ALINES(aa,a1,4,CHR(13),CHR(10))
FOR i=1 TO 8
    bb(i,1)=SUBSTR(aa(i),1,AT(",",aa(i),1)-1)
    FOR j=2 to 31
        bb(i,j)=SUBSTR(aa(i),AT(",",aa(i),j-1)+1,(AT(",",aa(i),j)-AT(",",aa(i),j-1))-1)
    ENDFOR
endfor
这种办法是不是太笨了!




xlrecno.rar (681 Bytes)


[此贴子已经被作者于2019-5-23 09:23编辑过]

搜索更多相关主题的帖子: TXT 数据 保存 维数 FOR 
2019-05-23 08:43
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10607
专家分:43182
注 册:2014-5-20
收藏
得分:10 
CREATE CURSOR tt (a1 I,a2 I,a3 I,a4 I,a5 I,a6 I,a7 I,a8 I,a9 I,a10 I,;
    a11 I,a12 I,a13 I,a14 I,a15 I,a16 I,a17 I,a18 I,a19 I,a20 I,;
    a21 I,a22 I,a23 I,a24 I,a25 I,a26 I,a27 I,a28 I,a29 I,a30 I,a31 I)
APPEND FROM xlrecno.txt DELIMITED
**BROWSE
COPY TO ARRAY arr
DISPLAY MEMORY LIKE arr
2019-05-23 13:59
厨师王德榜
Rank: 18Rank: 18Rank: 18Rank: 18Rank: 18
等 级:贵宾
威 望:199
帖 子:989
专家分:4966
注 册:2013-2-16
收藏
得分:10 
对vfp来说,一个表,或者一个cursor,岂不就是一个最好的二维数组?
能排序,能查询,能查找,还有哪家的二维数组能比vfp的一个表,或者一个cursor更好用?
2019-05-23 16:09
pjtyzyq
Rank: 4
等 级:业余侠客
威 望:6
帖 子:232
专家分:240
注 册:2016-2-14
收藏
得分:0 
谢谢!
2019-05-24 08:29
快速回复:TXT数据保存到二维数组
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.095234 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved