回复 29楼 fdqzy
应该不是变量数目的问题检查一下变量使用有无冲突,如25楼提到的变量kdxtj就有冲突。
随便定义60个变量测试:
程序代码:PRIVATE m1,m2,m3,m4,m5,m6,m7,m8,m9,m10,;
m11,m12,m13,m14,m15,m16,m17,m18,m19,m20,;
m21,m22,m23,m24,m25,m26,m27,m28,m29,m30,;
m31,m32,m33,m34,m35,m36,m37,m38,m39,m40,;
m41,m42,m43,m44,m45,m46,m47,m48,m49,m50,;
m51,m52,m53,m54,m55,m56,m57,m58,m59,m60
FOR i=1 TO 60
_vfp.SetVar("m"+TRANSFORM(i),0)
ENDFOR
fun()
fun1()
printvar(1,30)
printvar(31,60)
RETURN
FUNCTION fun()
FOR i=1 TO 30
EXECSCRIPT("m"+TRANSFORM(i)+"="+TRANSFORM(i))
ENDFOR
ENDFUNC
FUNCTION fun1()
FOR i=31 TO 60
EXECSCRIPT("m"+TRANSFORM(i)+"="+TRANSFORM(i))
ENDFOR
ENDFUNC
FUNCTION printvar(n,m)
FOR i=n TO m
? "m"+TRANSFORM(i), EVALUATE("m"+TRANSFORM(i))
ENDFOR
WAIT
ENDFUNC


