循环变量的数值的输出显示

lllllhua

原来变量范围不够，现在足够了仍然没法解决输出格式控制
/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 编辑 ]