首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 数据库 > VFP >

数组比较,大侠脱手

2013-12-15 
数组比较,大侠出手数组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(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

热点排行