set exact on
b=0
use dsxx
jsbh1=alltrim ( thisform.text1.value)
loca for allt(jsbh)=jsbh1
if found()
b= messagebox ("教师编号不能重复！",48)
thisform.text1.setfocus
endif
if b=0
append blank
repl jsbh with jsbh1
repl xm with thisform.text2.value
repl yjfx with thisform.text3.value
repl dbxcg with thisform.text2.value
thisform.text1.value=space(0)
thisform.text2.value=space(0)
thisform.text3.value=space(0)
thisform.text4.value=space(0)
thisform.text1.setfocus
endif
use
set exact off

loca for 那一行提示“函数参数的值、类型或数目无效”，VFP菜鸟，哪位大神可以指点一下下

看下字段数据类型与值数据类型是否相同