VFP组合框的条件显示问题 - VFP论坛

依风听暮

等　级：新手上路
帖　子：4
专家分：0
注　册：2016-12-2
结帖率：0

楼主

已结贴√ 问题点数：20 回复次数：7

VFP组合框的条件显示问题

我是初学，在编程时，用了两个组合框，一个用来下拉选择全国各省的名称，另一个我想让它根据前一个选择结果，显示相应省的市的名称，该如何处理呢？举例说明就是如果我在第一个下拉组合框中选择了“江苏省”，那么第二个组合框在下拉时，只显示江苏省内各市的名称，便于选择。用的数据表是一个，一个字段是省，一个字段是市。请高人指点。

搜索更多相关主题的帖子: 江苏省　数据表　如何　

2016-12-02 21:25

tlliqi

等　级：贵宾
威　望：204
帖　子：15453
专家分：65956
注　册：2006-4-27

第 3 楼

得分:0

https://bbs.bccn.net/thread-445676-1-1.html

2016-12-03 07:54

hyswcyh

等　级：贵宾
威　望：20
帖　子：391
专家分：896
注　册：2004-11-23

第 5 楼

得分:5

sysitemxzqhf.rar (77.5 KB)

表单初始化时，先把省份添加上

程序代码：

use sysitemxzqhf
sfcc=alltrim(sf)
thisform.text7.additem(alltrim('河南省'))
scan for alltrim(sf)#'河南省'
    if sfcc#alltrim(sf)
       thisform.text7.additem(alltrim(sf))
       sfcc=alltrim(sf)
    endif
endscan
use

text7是省；text8是市；text9是县
***********************************
text7.interactivechange写如下代码：

thisform.text8.clear
thisform.text9.clear
use sysitemxzqhf
dscc=''
set filter to alltrim(sf)==alltrim(thisform.text7.displayvalue)
go top
scan for alltrim(ds) # alltrim(thisform.text7.displayvalue) .or. (right(alltrim(sf),2)=='市')
    if dscc#alltrim(ds)
       thisform.text8.additem(alltrim(ds))
       dscc=alltrim(ds)
    endif
endscan
set filter to
use
thisform.text8.setfocus
thisform.refresh

***********************************
text8.interactivechange写如下代码：

thisform.text9.clear
use sysitemxzqhf
dscc=''
set filter to alltrim(sf)==alltrim(thisform.text7.displayvalue) .and. alltrim(ds)==alltrim(thisform.text8.displayvalue)
go top
scan
     if alltrim(xq) == alltrim(thisform.text8.displayvalue)
        thisform.text9.additem('市区')
     else
        thisform.text9.additem(alltrim(xq))
     endif
endscan
set filter to
use
thisform.text9.setfocus
thisform.refresh

2016-12-06 11:59

中国龙王

等　级：贵宾
威　望：16
帖　子：484
专家分：283
注　册：2006-5-17

第 7 楼

得分:5

不用那么麻烦.你在你一个框的VALID里加给第二个框的数据源限定一下就行了.
简单点用个 set filer to 搞定..

不要为了打发无聊而做无聊的事！不要在虚幻的世界里做虚幻的事！

2016-12-06 17:39