[求助]关联的下拉列表 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]关联的下拉列表

共有1594人关注过本帖树形打印复制链接主题：[求助]关联的下拉列表

wldhj

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：369 积分：4225 威望：0 精华：0 注册：2013/12/26 18:44:00

[求助]关联的下拉列表 发帖心情

Post By：2024/7/30 17:03:00 [只看该作者]

数据表中怎么实现选择一个下拉列表内容，另一个下拉列表内容也发生变化？比如有一个省份列，是一个下拉列表列，可以选择”湖北“、”湖南“、”江西“等，如果选择”湖北“，另一个”城市“下拉列表列，只能出现湖北省管辖的城市名.

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110783 积分：563847 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2024/7/30 17:14:00 [只看该作者]

参考：http://www.foxtable.com/webhelp/topics/1457.htm

wldhj

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：369 积分：4225 威望：0 精华：0 注册：2013/12/26 18:44:00

Post By：2024/7/31 9:49:00 [只看该作者]

能不能实现每一行根据内容不同，下拉列表也不同？

有点蓝

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110783 积分：563847 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2024/7/31 10:12:00 [只看该作者]

可以，就是2楼的用法。

wldhj

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：369 积分：4225 威望：0 精华：0 注册：2013/12/26 18:44:00

Post By：2024/7/31 10:25:00 [只看该作者]

这个只要省份列一个单元格变了，一改整个”城市“列的下拉列表都变了。我只想这个单元格所在的行的”城市“下拉列表改变

有点蓝

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110783 积分：563847 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2024/7/31 10:29:00 [只看该作者]

不会的，肯定您没有用对。请上传实例说明

wldhj

小大 7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：369 积分：4225 威望：0 精华：0 注册：2013/12/26 18:44:00

Post By：2024/7/31 10:40:00 [只看该作者]

代码写在 ChangeEdit 表事件里

If e.Col.Name ="省份" Then

Select Case e.Text

Case "湖北"
e.Table.Cols("城市").Combolist ="湛江佳信公司|深圳汇丰公司|北京冠豪公司"

Case "广东"
e.Table.Cols("城市").Combolist ="湛江佳信公司1|深圳汇丰公司1|北京冠豪公司1"

Case "湖南"
e.Table.Cols("城市").Combolist ="湛江佳信公司2|深圳汇丰公司2|北京冠豪公司2"

Case Else
e.Table.Cols("城市").Combolist ="湛江佳信公司3|深圳汇丰公司3|北京冠豪公司3"

End Select

end if

[此贴子已经被作者于2024/7/31 10:43:58编辑过]

有点蓝

小大 8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110783 积分：563847 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2024/7/31 10:48:00 [只看该作者]

没按帮助使用，必须放到PrepareEdit事件，另外代码的用法也不对

If e.IsFocusCell Then
    If e.Col.Name = "城市" Then
        Select Case e.Row("省份")
            Case "湖北"
                e.Col.ComboList = "湛江佳信公司|深圳汇丰公司|北京冠豪公司"
            Case "广东"
                e.Col.ComboList = "湛江佳信公司1|深圳汇丰公司1|北京冠豪公司1"

……
End Select
End If
End If

下一主题 >> << 上一主题

主题：[求助]关联的下拉列表