初学者，关于下拉列表的问题

dataWindow你没学过?

你可以用select语句把表中姓名检索出来
通过循环添加到下拉列表中

是呀

我用过呀
而且是多次用过
速度挺快的

谁能告诉我，在什么地方可以找到比较通俗易懂的学习资料呀。

我找了好长时间都没找到呀

string addybh
declare petor cursor for //设置游标名petor
select "cpy"."ybh" //cpy是表名.ybh要列名
from "cpy"
order by "cpy"."ybh" desc; //排列顺序
ddlb_ybh.reset() //ddlb_ybh为LISEBOX名
open petor; //打开游标
fetch petor into :addybh;
do while sqlca.sqlcode=0 //填入数据,若查询成功则继续
ddlb_ybh.insertitem(addybh,1)
ddlb_ybh.text=addybh
fetch petor into :addybh;
loop
close petor; //关闭油标号游标
//以上黑体字是我自定义的,我也是初学,和你一样要用下拉列表,找了半天终于弄出来了,希望对你有帮助

[此贴子已经被作者于2006-3-19 15:04:21编辑过]

检索出来怎么去掉重复直啊？　给点代码出来　谢谢

string addybh
declare petor cursor for //设置游标名petor
select "cpy"."ybh" //cpy是表名.ybh要列名
from "cpy"
order by "cpy"."ybh" desc; //排列顺序
ddlb_ybh.reset() //ddlb_ybh为LISEBOX名
open petor; //打开游标
fetch petor into :addybh;
do while sqlca.sqlcode=0 //填入数据,若查询成功则继续
ddlb_ybh.insertitem(addybh,1)
ddlb_ybh.text=addybh
fetch petor into :addybh;
loop
close petor; //关闭油标号游标


distinct　　防在哪？／谢谢　我新手

declare cur cursor for
select UserName from yonghu;

open cur ;
fetch cur into :name;

ddlb_1.additem( name )
//end if
do while sqlca.sqlcode = 0
fetch next cur into :name;

ddlb_1.additem( name )

loop
close cur;