Question

VFP的操作符/操作类型不匹配

代码都是抄书写的就是不行啊。。气死我了
*选择库存信息表
select 库存信息表
priv a
locate for 货号=upper(allt(thisform.textgoodsnumber.value))
if not found()
=messagebox('没有该货物的货号,请先创建该货物!',0+64+0,'提示')
go top
else
*1---更新货物数量
a=库存信息表.现有数量
*如果库存小与零,则让现有库存为 0
if a<0
a=0
endif
a=a+val(thisform.text4.value)
replace 库存信息表.现有数量 with a
*2---将入库信息同时写入采购入库信息表
*选择采购入库信息表
select 采购入库信息表
append blank
go bottom
*在进货表中添加了主要信息，其余信息根据情况自行添加，或查询可得
replace 采购入库信息表.货号 with alltrim(thisform.textgoodsnumber.value)
replace 采购入库信息表 .数量 with a
replace 采购入库信息表 .进价 with alltrim(thisform.text3.value)
replace 采购入库信息表 .客户代码 with alltrim(thisform.text11.value)
*提示完成
=messagebox('入库成功!',0+64+0,'提示')
endif

Answer 1

replace 采购入库信息表 .进价 with alltrim(thisform.text3.value)
库存信息表中字段 进价 应为 文本型
如设计成数值型则出错

Answer 2

把 ： 采购入库信息表 .进价 with alltrim(thisform.text3.value) 中的alltrim()去掉试一下，text3这个控件估计是数值型，alltrim是去掉字符型变量的前后空格