数组的数据类型问题
a,b均为全程数组,a中数据为字符型或数值型,b为新建数组,但是将a中数据赋值给b时 比如:b((i-2)*(j-2),1)=alltrim(a(i,j)),却说 操作符/数据类型不匹配,怎么回事?我以前的程序也是这么写的就没有问题
另外,新建数组b未赋值时的数据值是不是 .f. ,数据类型显示为 L ???
各位大侠,急用,在线等
现在发现不是数据类型,而是数组下标的问题,改成b((1,1)=alltrim(a(i,j)),提示为无效的下标引用 ,而b((1,1)=alltrim(a(3,3)),则可以正确运行?i,j,初始值为3,3,赋值语句在do while 循环中。
源程序:
close all
n=72
public b(n*36,3)
use 表1
copy to array a
m=38
j=3
do while j<=m
i=3
do while i<=n
b((i-2)*(j-2),1)=alltrim(a(i,j))
a(i+1,j-1)=alltrim(a(i+1,j-1))
a(i+1,j-2)=alltrim(a(i+1,j-2))
a(i+1,j)=alltrim(a(i+1,j))
if val(a(i+1,j-1))<10
a(i+1,j-1)="0"+a(i+1,j-1)
endif
b((i-2)*(j-2),2)="2001"+a(i+1,j-2)+a(i+1,j-1)
if a(i+1,j)=null
a(i+1,j)=0
endif
b((i-2)*(j-2),3)=a(i+1,j)
i=i+1
enddo
j=j+1
enddo
use 表2
appe from array b