VAL（"X"+STR(J)）的值永远等于0

不明白之处，请看VFP帮助文件。

n1="X"
FOR J=1 TO 12
IF EVALUATE(FIELD(J))>1500
UPDATE 表2 SET X2=&n1+allt(str(j)),X3=&n1+allt(str(j+1)),.....&&语法错误
ENDIF

FOR J=1 TO 12
IF EVALUATE(FIELD(J))>1500&& 应该是VAL（FIELD（））
UPDATE 表2 SET X2=EVALUATE(FIELD(J)),X3=EVALUATE(FIELD(J+1)) &&替换的全部是空白记录
ENDIF

难怪都是空白记录呢！

要先判断字段的数据类型，如果字段的数据类型为数值型，...>1500
IF TYPE(FIELD(J))='N' AND EVALUATE(FIELD(J))>1500

字段都是字符型.EVALUATE(FIELD(J))>1500,是不行。那么是不是应该VAL(EVALUATE(FIELD(J)))>1500?

[ 本帖最后由 CHB123 于 2013-9-30 23:19 编辑 ]

多做少问，是否行，自己先试试

少传些数据看看

要取字段的值，试试：
cZdm="X"+str(j)    &&要注意消除str(j)的前后空格，并注意字段名是否存在前导0，如X001、X002
if VAL(&cZdm)>1500

[ 本帖最后由 hu9jj 于 2013-10-1 08:18 编辑 ]

要注意首先要确定字段名的组成是否正确，然后通过宏替换获得字段的值，再进行转换。
直接使用val("X'+str(j))表达式，只能对“X1”、“X2”...等字符串进行转换，由于VAL函数遇到非数字就结束转换，你的字符串第一个字符就不是数字，所以结果恒等于0。