|
#2
吹水佬2021-08-06 19:27
|
大家好，我有个程序，在执行到红色的地方就会提示“缺少操作数”，能帮忙看看怎么回事吗？谢谢了！
下边是其中一部分命令：
use lsk
repl all 球化率标准 with bz1,铁素体标准 with bz2,珠光体标准 with bz3,碳化物标准 with bz4 for 以色列=1
repl all 球化率标准 with bz21,铁素体标准 with bz22,珠光体标准 with bz23,碳化物标准 with bz24 for 以色列=2
repl all 球化率标准 with bz31,铁素体标准 with bz32,珠光体标准 with bz33,碳化物标准 with bz34 for 以色列=3
repl all 球化率标准 with bz41,铁素体标准 with bz42,珠光体标准 with bz43,碳化物标准 with bz44 for 以色列=4
repl all 球化率标准 with bz51,铁素体标准 with bz52,珠光体标准 with bz53,碳化物标准 with bz54 for 以色列=5
repl all 球化率标准 with bz61,铁素体标准 with bz62,珠光体标准 with bz63,碳化物标准 with bz64 for 以色列=6
repl all 球化率标准 with bz71,铁素体标准 with bz72,珠光体标准 with bz73,碳化物标准 with bz74 for 以色列=7
repl all 球化率结论 with 0,铁素体结论 with 0,珠光体结论 with 0,碳化物结论 with 0
go top
do while.not.eof()
ysl=以色列
b1=球化率
b2=铁素体
b3=珠光体
b4=碳化物
if ysl=1
ll1=allt(str(b1,8,3))+bz1
ll2=allt(str(b2,8,3))+bz2
ll3=allt(str(b3,8,3))+bz3
ll4=allt(str(b4,8,3))+bz4
else
if ysl=2
ll1=allt(str(b1,8,3))+bz21
ll2=allt(str(b2,8,3))+bz22
ll3=allt(str(b3,8,3))+bz23
ll4=allt(str(b4,8,3))+bz24
endif
if ysl=3
ll1=allt(str(b1,8,3))+bz31
ll2=allt(str(b2,8,3))+bz32
ll3=allt(str(b3,8,3))+bz33
ll4=allt(str(b4,8,3))+bz34
endif
if ysl=4
ll1=allt(str(b1,8,3))+bz41
ll2=allt(str(b2,8,3))+bz42
ll3=allt(str(b3,8,3))+bz43
ll4=allt(str(b4,8,3))+bz44
endif
if ysl=5
ll1=allt(str(b1,8,3))+bz51
ll2=allt(str(b2,8,3))+bz52
ll3=allt(str(b3,8,3))+bz53
ll4=allt(str(b4,8,3))+bz54
endif
if ysl=6
ll1=allt(str(b1,8,3))+bz61
ll2=allt(str(b2,8,3))+bz62
ll3=allt(str(b3,8,3))+bz63
ll4=allt(str(b4,8,3))+bz64
endif
if ysl=7
ll1=allt(str(b1,8,3))+bz71
ll2=allt(str(b2,8,3))+bz72
ll3=allt(str(b3,8,3))+bz73
ll4=allt(str(b4,8,3))+bz74
endif
endif
if &ll1.=.t.
repl 球化率结论 with 1
endif
if &ll2.=.t.
repl 铁素体结论 with 1
endif
if &ll3.=.t.
repl 珠光体结论 with 1
endif
if &ll4.=.t.
repl 碳化物结论 with 1
endif
