循环变量的数值的输出显示
原来变量范围不够，现在足够了仍然没法解决输出格式控制/prep7
!*
ii=1
jj=1
kk=1
ll=1
mm=1
nn=1
oo=1
pp=1
pie1='A'
pie2='00B'
pie3='00C'
pie4='00D'
pie5='00E'
pie6='00F'
pie7='00G'
PPPP='00'
*CREATE,ansuitmp
*CFOPEN,'data_title','txt',' ',APPEND
*do,i,1,4,1
*do,j,1,4,1
*do,k,1,4,1
*do,l,1,4,1
*do,m,1,4,1
*do,n,1,4,1
*do,o,1,4,1
ii=%i%
jj=%j%
kk=%k%
ll=%l%
mm=%m%
nn=%n%
oo=%o%
*VWRITE,pie1,ii,pie2,jj,pie3,kk,pie4,ll,pie5,mm,pie6,nn,pie7,oo,PPPP,
(A1,d1.0,A3,d1.0,A3,d1.0,A3,d1.0,A3,d1.0,A3,d1.0,A3,d1.0,A2)
*enddo
*enddo
*enddo
*enddo
*enddo
*enddo
*enddo
*CFCLOS
*END
/INPUT,ansuitmp
!*
[ 本帖最后由 16443 于 2008-11-24 13:49 编辑 ]
页:
[1]