[求助]可视化授权表的列能不能直接获取，选择？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]可视化授权表的列能不能直接获取，选择？

共有5609人关注过本帖树形打印复制链接主题：[求助]可视化授权表的列能不能直接获取，选择？

kunge

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

等级：幼狐帖子：151 积分：1254 威望：0 精华：0 注册：2012/5/29 16:50:00

[求助]可视化授权表的列能不能直接获取，选择？ 发帖心情

Post By：2013/10/22 14:43:00 [显示全部帖子]

在可视化授权表中，要写入表名，列名，如果一个表列很多，使用者又不太熟悉，录入时，是不是相当麻烦啊？能不能做个下拉框，在表名选择后，自动获取这个表的所有列，作为列名的下拉框？

kunge

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

等级：幼狐帖子：151 积分：1254 威望：0 精华：0 注册：2012/5/29 16:50:00

Post By：2013/10/22 15:13:00 [显示全部帖子]

是不是我还要新建一个表，把表名列名一一对应好？狐表的自带的，下拉框很多可以自动获取列名，能不能不用新建表，用代码获取呢？

kunge

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

等级：幼狐帖子：151 积分：1254 威望：0 精华：0 注册：2012/5/29 16:50:00

Post By：2013/10/22 17:33:00 [显示全部帖子]

If e.Col.Name = "表名" Then

Dim dtname As String

For Each dt As DataTable In DataTables

dtname=dtname & dt.name & "|"

Tables("授权表").cols("表名").Combolist= dtname.trim("|")

End If

If e.Col.Name = "列名" Then

Dim clname As String

For Each cl As Col In DataTables("表名").Cols

clname=clname & cl.name & "|"

Tables("授权表").cols("列名").Combolist= clname.trim("|")

End If

帮助上，不是可以直接引用e.Col.Combolist = DataTables("行政区域").GetComboListString，表名，我这里不可以，遍厉，选择的表名，以获得列名时，提示错误！可能是这段代码，系统无法判断，改怎么遍历获得列呢？

kunge

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

等级：幼狐帖子：151 积分：1254 威望：0 精华：0 注册：2012/5/29 16:50:00

Post By：2013/10/22 17:48:00 [显示全部帖子]

我在PrepareEdit 事件里添加的代码，表名的下拉框可以正常获取，我又添加列的下拉框，获取就失败了，
下载信息 [文件大小：下载次数： ]
点击浏览该文件:授权表.foxdb

主题：[求助]可视化授权表的列能不能直接获取，选择？