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

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

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

even0898

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

加好友

发短信

等级：幼狐帖子：186 积分：1294 威望：0 精华：0 注册：2011/8/17 17:29:00

[求助]关于下拉列表框 发帖心情

Post By：2012/11/11 14:09:00 [只看该作者]

图片点击可在新窗口打开查看此主题相关图片如下：未命名.gif

For Each dt As DataTable In DataTables
Tables("权限设置表").Cols("表名").ComboList = dt.name
Next

这个要放在哪个事件里才有作用？

我放在增加行事件里只能显示1个表名

sgs

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

加好友

发短信

等级：小狐帖子：365 积分：2693 威望：0 精华：1 注册：2011/11/25 7:55:00

Post By：2012/11/11 14:13:00 [只看该作者]

prepareedit

even0898

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

加好友

发短信

等级：幼狐帖子：186 积分：1294 威望：0 精华：0 注册：2011/8/17 17:29:00

Post By：2012/11/11 14:17:00 [只看该作者]

只能显示1个表名是怎么回事呢？

我遍历了所有的表名啊

在命令窗口我用output.show是可以显示全部的..

ahbzczy

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

加好友

发短信

等级：童狐帖子：268 积分：2307 威望：0 精华：0 注册：2010/3/26 14:08:00

Post By：2012/11/11 16:51:00 [只看该作者]

列表项目中间要加“|”的，这个你要编码完成，再

Tables("权限设置表").Cols("表名").ComboList =

even0898

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

加好友

发短信

等级：幼狐帖子：186 积分：1294 威望：0 精华：0 注册：2011/8/17 17:29:00

Post By：2012/11/12 9:03:00 [只看该作者]

以下是引用ahbzczy在2012-11-11 16:51:00的发言：

列表项目中间要加“|”的，这个你要编码完成，再

Tables("权限设置表").Cols("表名").ComboList =

晕，我就是不想手输表名...那该怎么办？

lin_hailun

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

加好友

发短信

等级：狐神帖子：6708 积分：34304 威望：0 精华：11 注册：2012/8/18 23:10:00

Post By：2012/11/12 9:10:00 [只看该作者]

以下是引用even0898在2012-11-12 9:03:00的发言：

晕，我就是不想手输表名...那该怎么办？

Dim dts As String = ""
For Each dt As DataTable In DataTables
dts = dts & dt.Name & "|"
Next

Tables("权限设置表").Cols("表名").ComboList = dts

even0898

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

加好友

发短信

等级：幼狐帖子：186 积分：1294 威望：0 精华：0 注册：2011/8/17 17:29:00

Post By：2012/11/12 9:30:00 [只看该作者]

以下是引用lin_hailun在2012-11-12 9:10:00的发言：

Dim dts As String = ""
For Each dt As DataTable In DataTables
dts = dts & dt.Name & "|"
Next

Tables("权限设置表").Cols("表名").ComboList = dts

谢谢小林..明白了

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

主题：[求助]关于下拉列表框