[已解决]怎么实现动态数据字典多选吗？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [已解决]怎么实现动态数据字典多选吗？

共有2094人关注过本帖树形打印复制链接主题：[已解决]怎么实现动态数据字典多选吗？

martin723

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

等级：童狐帖子：245 积分：2036 威望：0 精华：0 注册：2019/3/20 10:45:00

[已解决]怎么实现动态数据字典多选吗？ 发帖心情

Post By：2019/4/1 9:04:00 [只看该作者]

利用类型TableDataMap来根据数据表创建数据字典，可只能够单选，能不能在前面加上复选框，给予多值。

本来想从用户表中把所有角色全列出来，在菜单表中的角色字段里显示，可以多选。

用TableDataMap可以直接列出所有用户可以使用的角色，但不知道怎么实现角色多选。

Dim dmp As New TableDataMap

dmp.DataTable = "用户" '指定数据来源表

dmp.ValueCol = "Config" '指定取值列

dmp.DisplayCol = "Config" '指定显示列

dmp.ListCols = "Config"

dmp.Filter = "[Name] = 'Roles'"

Tables("菜单").Cols("角色").DataMap = dmp.CreateDataMap() '生成并设置DataMap

[此贴子已经被作者于2019/4/1 9:26:40编辑过]

martin723

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

等级：童狐帖子：245 积分：2036 威望：0 精华：0 注册：2019/3/20 10:45:00

Post By：2019/4/1 9:09:00 [只看该作者]

另外从用户表中取得的列表实际上是回车换行，下拉列表没法选，实际上只有一个值，需要把回车分开

martin723

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

等级：童狐帖子：245 积分：2036 威望：0 精华：0 注册：2019/3/20 10:45:00

Post By：2019/4/1 9:26:00 [只看该作者]

解决了！

[此贴子已经被作者于2019/4/3 10:19:56编辑过]

主题：[已解决]怎么实现动态数据字典多选吗？