第2个回答 2011-05-25
.版本 2
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
组合框1.加入项目 (“1”, 1)
组合框1.加入项目 (“3”, 2)
组合框1.加入项目 (“6”, 3)
组合框1.加入项目 (“8”, 4)
.子程序 _按钮1_被单击
.局部变量 a, 整数型
.局部变量 y, 整数型
.计次循环首 (组合框1.取项目数 (), a)
y = 寻找文本 (组合框1.取项目文本 (a - 1), 编辑框1.内容, , 假)
.如果真 (y > 0)
组合框1.现行选中项 = a - 1
跳出循环 ()
.如果真结束
.计次循环尾 ()