多个组合框

rm0724

我想问一下  比如   我选组合框1中的北京  组合框2的内容就成丰台区 海淀区  组合框3的内容也跟着改变之类的！！  说白了 我就是想做个天气预报！
请问怎么实现呀？？

一棒过克

嘿嘿，你们讲的方法太深，估计难懂……我说的生猛方法，易学易懂，只要不怕累……


组合框的DD.rar (1.29 KB, 下载次数: 72)

2011-11-1 02:41 上传

点击文件名下载附件

柳叶飞

先将地区编号列入数组，然后对数组进行操作即可

清清淡淡

{:3_244:}看看吧

一棒过克

告诉你一个生猛的办法：在组合框1列表项被选择事件中：
组合框2.清空（）
判断（组合框1.现行选中项=0）
组合框2.加入项目（。。。）
组合框2.加入项目（。。。）
判断（组合框1.现行选中项=1）
  组合框2.加入项目（。。。）
  组合框2.加入项目（。。。）


要加多少随你愿意了，组合框3照此办理……{:3_233:}

rm0724

柳叶飞 发表于 2011-10-30 21:10
先将地区编号列入数组，然后对数组进行操作即可

数组？？？  说明白点呗   最后有例程

流星

回复·！！！！！！！！！！

芋焖肥肠

很多办法可以实现，比如配置文件，比如文本里编号

[e]
.版本 2

.程序集 窗口程序集1

.子程序 __启动窗口_创建完毕
.局部变量 i, 整数型

文本 ＝ 到文本 (读入文件 (“d:\我的文档\最新县及县以上行政区划代码（截止2008年12月31日）.txt”))
分割 ＝ 分割文本 (文本, #换行符, )
.计次循环首 (取数组成员数 (分割), i)
    .如果真 (寻找文本 (分割 , “0000　”, , 假) ＞ 0)
        组合框_省.加入项目 (取文本中间 (分割 , 9, 取文本长度 (分割 ) － 8), 到整数 (取文本左边 (分割 , 6)))
    .如果真结束

.计次循环尾 ()
' 组合框_数量. ＝ “数量”

.子程序 _组合框_省_列表项被选择
.局部变量 i, 整数型
.局部变量 a, 文本型

组合框_市县.清空 ()
a ＝ 取文本左边 (到文本 (组合框_省.取项目数值 (组合框_省.现行选中项)), 2)
.计次循环首 (取数组成员数 (分割), i)
    .如果真 (取文本左边 (删首空 (分割 ), 2) ＝ a 且 取文本中间 (删首空 (分割 ), 3, 4) ≠ “0000”)
        组合框_市县.加入项目 (取文本中间 (分割 , 11, 取文本长度 (分割 ) － 10), 到整数 (取文本左边 (删首空 (分割 ), 6)))
    .如果真结束

.计次循环尾 ()

[/e]


最新县及县以上行政区划代码（截止2008年12月31日）
　2009-06-26 14:36:20

代码　名称

110000　北京市
110100　　市辖区
110101　　　东城区
110102　　　西城区
110103　　　崇文区
110104　　　宣武区
110105　　　朝阳区
110106　　　丰台区
110107　　　石景山区
110108　　　海淀区
110109　　　门头沟区
110111　　　房山区
110112　　　通州区
110113　　　顺义区
110114　　　昌平区
110115　　　大兴区
110116　　　怀柔区
110117　　　平谷区
110200　　县
110228　　　密云县
110229　　　延庆县

120000　天津市
120100　　市辖区
120101　　　和平区
120102　　　河东区
120103　　　河西区
120104　　　南开区
120105　　　河北区
120106　　　红桥区
120107　　　塘沽区
120108　　　汉沽区
120109　　　大港区
120110　　　东丽区
120111　　　西青区
120112　　　津南区
120113　　　北辰区
120114　　　武清区
120115　　　宝坻区
120200　　县
120221　　　宁河县
120223　　　静海县
120225　　　蓟　县