以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 下拉列表添加内容 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=123789) |
-- 作者:实话实说 -- 发布时间:2018/8/23 8:48:00 -- 下拉列表添加内容 产品表的颜色列取值下拉列表的颜色列,如果下拉列表的颜色列没有所要的颜色,则在产品表的颜色列手工添加,这时,如何将手工添加的值传递到下拉列表的颜色列?我不想在下拉列表中手工添加。 |
-- 作者:有点蓝 -- 发布时间:2018/8/23 9:11:00 -- 参考:http://www.foxtable.com/webhelp/scr/1453.htm |
-- 作者:实话实说 -- 发布时间:2018/8/23 9:59:00 -- 是这样吗?可是不行. If e.DataCol.Name = "颜色" Then Dim dr As DataRow dr = DataTables("下拉列表").Find("[颜色] = \'" & e.NewValue & "\'") If dr Is Nothing Then dr("颜色") = e.DataRow("颜色") End If End If
|
-- 作者:有点蓝 -- 发布时间:2018/8/23 10:04:00 -- If dr Isnot Nothing Then |
-- 作者:实话实说 -- 发布时间:2018/8/23 10:11:00 -- 下拉列表中并不增加 |
-- 作者:有点蓝 -- 发布时间:2018/8/23 10:13:00 -- 不应该呀,都是很基础的语法 If dr Is Nothing Then dr = DataTables("下拉列表").addnow End If dr("颜色") = e.DataRow("颜色")
|
-- 作者:实话实说 -- 发布时间:2018/8/23 10:42:00 -- 能否直接在黄色后面添加? |
-- 作者:有点蓝 -- 发布时间:2018/8/23 11:01:00 -- 可以,再find 颜色 is null的行即可。但是感觉这样的逻辑不合理啊 |
-- 作者:实话实说 -- 发布时间:2018/8/23 11:17:00 -- 我是将一部分下拉项目集中一个表管理,每一列内容不一样,有的列会有空格存在,但每列内容之间不应有空格,虽然不影响使用,但很难看。希望能帮我解决。 |
-- 作者:有点蓝 -- 发布时间:2018/8/23 11:29:00 -- 用横表,不要使用竖表 |