欢迎来到Doc100.Net免费学习资源知识分享平台!
您的位置:首页 > 程序异常 >

数组比较,大侠脱手

更新时间: 2014-01-05 02:26:49 责任编辑: Author_N1

 

数组比较,大侠出手
数组a(22,5),b(22,5),变量T,
当a(1,1)=b(1,1),a(1,2)=b(1,2),a(1,3)=b(1,3),a(1,4)=b(1,4),a(1,5)=b(1,5),
a(2,1)=b(2,1),a(2,2)=b(2,2),a(2,3)=b(2,3),a(2,4)=b(2,4),a(2,5)=b(2,5),
....
....
....
a(22,1)=b(22,1),a(22,2)=b(22,2),a(22,3)=b(22,3),a(22,4)=b(22,4),a(22,5)=b(22,5),
时T=0,只要有1个不相等,T=1
FOR循环好做
但是do while  怎么做呢?


--参考方法--
T=0
For lnI=1 To 22
For lnJ=1 To 5
If a(lnI,lnJ)<>b(lnI,lnJ)
T=1
Exit
Endif
Endfor
If T=1
Exit
Endif
Endfor


--参考方法--
T=0
I=1
J=ALEN(A)
DO WHILE .T.
IF A(I)=B(I)
T=1
EXIT
ENDIF
I=I+1
IF I>J
EXIT
ENDIF
ENDDO

上一篇:上一篇
下一篇:下一篇

 

随机推荐程序问答结果

 

 

如对文章有任何疑问请提交到问题反馈,或者您对内容不满意,请您反馈给我们DOC100.NET论坛发贴求解。
DOC100.NET资源网,机器学习分类整理更新日期::2014-01-05 02:26:49
如需转载,请注明文章出处和来源网址:http://www.doc100.net/bugs/t/9861/
本文WWW.DOC100.NET DOC100.NET版权所有。