pb 给下拉列表item赋值

在一个下拉列表(8)中选中一个选项后，根据这个选项在数据库中查询出一些数据赋给另一个下拉列表框(10)作为item，该怎么做?
string cpuv,is_cpub
is_cpub=string(ddlb_8.text)
int i
declare cv cursor for
select CPUversion
from CPU
where CPUbrand=:is_cpub
open cv;
fetch cv into :cpuv;
do while sqlca.sqlcode=0
ddlb_10.additem(cpuv)
fetch cv into :cpuv;
loop
close cv;
我写的代码不能实现，数据库设定有两个数据要设为item,应该能产生，因为在10中产生两个空白选项，这是为什么？

在下拉列表框8的selectionchanged() 事件中编写代码
string ls_cpub
ls_cpub = trim(this.text)
if ls_cpuib = "" then
return
end if

。。。。。。
。。。。。。
定义游标并将数据载入下拉列表10，

ddlb_10.addItem(cpuv)

最后别忘记关闭游标！

支持一下感觉挺不错的