611
社区成员
发帖
与我相关
我的任务
分享求解难题！！！！
一个数据窗口中有两列：
客户序号 客户名称
在客户序号中输入一个值，按回车，然后客户名称中自动出现相应的值，光标也跳到客户名称这一列。如何实现？
客户序号 客户名称
在客户序号中输入一个值，按回车，然后客户名称中自动出现相应的值，光标也跳到客户名称这一列。如何实现？
...全文
请发表友善的回复…
发表回复
pearlz 2002-11-30
- 打赏
- 举报
string get_bh
string mc
CHOOSE CASE dw_1.GetColumnName()
CASE "客户序号"
get_bh = dw_1.GetText()
select 客户名称 into :mc from 表 where bh=:get_bh using sqlca;
if sqlca.sqlcode = 0 then
dw_1.SetItem(dw_1.GetRow(),"mc",mc)
return 0
else
MessageBox("警告","无此用户号")
return 1
end if
end choose
string mc
CHOOSE CASE dw_1.GetColumnName()
CASE "客户序号"
get_bh = dw_1.GetText()
select 客户名称 into :mc from 表 where bh=:get_bh using sqlca;
if sqlca.sqlcode = 0 then
dw_1.SetItem(dw_1.GetRow(),"mc",mc)
return 0
else
MessageBox("警告","无此用户号")
return 1
end if
end choose
