| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 783 人关注过本帖
标题:[求助]二维数组的数据读入方法
只看楼主 加入收藏
mmhunter
Rank: 1
等 级:新手上路
帖 子:24
专家分:0
注 册:2005-3-4
收藏
 问题点数:0 回复次数:4 
[求助]二维数组的数据读入方法
小弟将一个表(两个字段)的数据读入一个二维数组A(33,2)中,代码如下,不知为何在运行时,I 不变化,只有J变化。请各位达人给看下哈!

FOR I=1 TO 33 STEP 1
 DO WHILE NOT EOF()
 FOR J=1 TO 2 STEP 1
  SCATTER FIEL JSBH,ZRJS TO A(I,J)
   IF NOT EOF()
    SKIP
   ELSE
    EXIT
   ENDIF
 ENDFOR
 ENDDO
 ENDFOR

错在哪里,如何改进,谢谢!
搜索更多相关主题的帖子: 数据 
2005-10-17 10:09
vfpuse
Rank: 1
等 级:新手上路
帖 子:53
专家分:0
注 册:2005-9-9
收藏
得分:0 
表中的數據沒有向下跳動
應該在第一個for循環加入一個skip以便表向下跳動,否則填入二維數組的值將會全是表中的第一行數據.
2005-10-17 14:21
mmhunter
Rank: 1
等 级:新手上路
帖 子:24
专家分:0
注 册:2005-3-4
收藏
得分:0 
经过测试发现:只在内循环执行,根本跳不到外循环!郁闷的说!!!

对于编程,原来我什么都不懂!
2005-10-17 18:44
mmhunter
Rank: 1
等 级:新手上路
帖 子:24
专家分:0
注 册:2005-3-4
收藏
得分:0 
解决。谢谢各位!

对于编程,原来我什么都不懂!
2005-10-23 19:27
追求者
Rank: 1
等 级:新手上路
帖 子:32
专家分:0
注 册:2006-1-7
收藏
得分:0 
FOR I=1 TO 33 STEP 1
DO WHILE NOT EOF()
IF EOF()
EXIT
ENDIF
FOR J=1 TO 2 STEP 1
SCATTER FIEL JSBH,ZRJS TO A(I,J)
ENDFOR
ENDDO
SKIP
ENDFOR

你试下这样行不行。。。。

最大的乐趣是————在别人的电脑上跑自己的程序
2006-01-31 11:43
快速回复:[求助]二维数组的数据读入方法
数据加载中...
 
   



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

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