- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]关于下拉列表框 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=25531)
-- 发布时间：2012/11/11 14:09:00
-- [求助]关于下拉列表框
此主题相关图片如下：未命名.gif
For Each dt As DataTable In DataTables
Tables("权限设置表").Cols("表名").ComboList = dt.name
Next
这个要放在哪个事件里才有作用？
我放在增加行事件里只能显示1个表名
-- 发布时间：2012/11/11 14:13:00
--
prepareedit
-- 发布时间：2012/11/11 14:17:00
--
只能显示1个表名是怎么回事呢？
我遍历了所有的表名啊
在命令窗口我用output.show是可以显示全部的..
-- 发布时间：2012/11/11 16:51:00
--
列表项目中间要加“|”的，这个你要编码完成，再
Tables("权限设置表").Cols("表名").ComboList =
-- 发布时间：2012/11/12 9:03:00
--
以下是引用ahbzczy在2012-11-11 16:51:00的发言：
列表项目中间要加“|”的，这个你要编码完成，再
Tables("权限设置表").Cols("表名").ComboList =
晕，我就是不想手输表名...那该怎么办？
-- 发布时间：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
-- 发布时间：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
Dim dts As String = ""
For Each dt As DataTable In DataTables
dts = dts & dt.Name & "|"
Next
Tables("权限设置表").Cols("表名").ComboList = dts
谢谢小林..明白了