1、在输入TXTCODE的数据后，TXTCHNAME自动跳出中文名字来
决定方式：
1)在INFLOW表单数据环境中加入INFLOW.DBF（以ENNAME、CODE字做做升序索引）、CODE.DBF（以ENNAME、CODE字段做升序索引）、LS.DBF（以ENNAME、CODE字段做升序索引）,INFLOW.DBF属性、数据、EXCLUSIVE设为.T.(以独占方式打开数据库)。
2)在FORM1表单中的INIT过程中加入
SELECT CODE
SELECT LS
SELECT INFLOW
ZAP
APPEND BLANK
。。。。。。
。。。。。。
。。。。。。（和你以前的一样）
3)在TXTCODE的VALID EVENT（在控件失去焦点前发生）过程中写入
SELECT CODE
LOCA FOR CODE=UPPER(ALLTRIM(THISFORM.TXTCODE.VALUE))
IF !EOF()
THISFORM.TXTCHNAME.VALUE=CHNAME
ELSE
MESSAGEBOX("无止型号，请确定后再输入！",48,"信息窗口"）
ENDI

不好意思昨天白天在外面不能帮你写。