马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?站点注册
×
int i,m,j,l,n,o,p,q,r,s,t,u,w long km int z1[63] int z1b[63] int z1t[63] int z1w[63] int z1h[63] int z1ht[63] int z1hw[63] string k dw_1.setfocus() m=dw_1.getrow() j=dw_1.getitemnumber(m,1) l=dw_1.getitemnumber(m,2) for i=1 to 63 z1ht=dw_1.getitemnumber(m,i+2) z1hw=dw_1.getitemnumber(m,i+65) z1h=dw_1.getitemnumber(m,i+128) z1b=dw_1.getitemnumber(m,i+191) z1=dw_1.getitemnumber(m,i+254) z1t=dw_1.getitemnumber(m,i+317) z1w=dw_1.getitemnumber(m,i+380) end for for n=1 to 63 for o=1 to 63 for p=1 to 63 for q=1 to 63 for r=1 to 63 for s=1 to 63 for t=1 to 63 u=u+z1[n]+z1b[o]+z1t[p]+z1w[q]+z1h[r]+z1ht+z1hw[t] if mod(u,12)=j then k="z1["+string(n)+"]"+"+"+"z1b["+string(O)+"]"+"+"+"z1t["+string(p)+"]"+"+"+"z1w["+string(q)+"]"+"+"+"z1h["+string(r)+"]"+"+"+"z1ht["+string(s)+"]"+"+"+"z1hw["+string(t)+"]" km=km+1 insert into ms values(:km,:l,:k); end if u=0 k="" end for end for end for end for end for end for end for 看到上面的代码我晕啊!,请大虾们邦忙改进啊.运行起来比蜗牛还慢啊! |