一、先建立包含 编号 C型,名称 C型,单价 N型 三个字段的表,长度根据需要自定,起名:价格表.dbf。
二、将表单中的 编号 对应的文本框改为组合框combo1,名称、单价对应文本框text1、text2;表单的数据环境中添加 价格表.dbf。
三、设置combo1属性,rowsource值为:价格表.编号;rowsourcetype值为:6-字段。
四、设置text1、text2属性,readonly值为:.T.-真
五、combo1的interactivechange事件代码
bh1=
&&将combo1所选编号赋值给变量bh1
bh=[']+bh1+[']
&&将bh1加定界符,字段编号是字符型
select 价格表
&&选择价格表
locate for 编号=&bh
&&在价格表中查找所选择编号
thisform.text1.value=名称
thisform.text2.value=单价
六、运行表单,combo1编号选择完成,text1、text2即显示该编号对应的名称、单价。