Foxtable(狐表) → 用户栏目 → 专家坐堂 → [讨论]用代码自定义列表项目不能选择是什么问题


  共有2439人关注过本帖树形打印复制链接

主题：[讨论]用代码自定义列表项目不能选择是什么问题
帅哥哟，离线，有人找我吗？
静听枫雨
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：255 积分：2152 威望：0 精华：0 注册：2013/6/8 22:41:00 		[讨论]用代码自定义列表项目不能选择是什么问题  发帖心情 Post By：2017/12/12 18:13:00 [显示全部帖子]

在窗口的ComboBox控件里  如果用属性里的自定义列表项目，正常。但通过下面的代码，即不能选择。是什么问题
Dim cmb As WinForm.ComboBox = e.form.Controls("印色")
cmb.ComboList = DataTables("颜色表").GetComboListString("颜色","","值")
 回到顶部
帅哥哟，离线，有人找我吗？
静听枫雨
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：255 积分：2152 威望：0 精华：0 注册：2013/6/8 22:41:00 		  发帖心情 Post By：2017/12/12 19:14:00 [显示全部帖子]

颜色表 有内容，能下拉 但下拉后，不能选择，选后值为空白 
[此贴子已经被作者于2017/12/12 19:34:39编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
静听枫雨
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：255 积分：2152 威望：0 精华：0 注册：2013/6/8 22:41:00 		  发帖心情 Post By：2017/12/12 20:08:00 [显示全部帖子]

颜色表 有内容，窗口里的控件能下拉出来颜色， 但下拉后，不能选择，选后值为空白 

 回到顶部
帅哥哟，离线，有人找我吗？
静听枫雨
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：255 积分：2152 威望：0 精华：0 注册：2013/6/8 22:41:00 		  发帖心情 Post By：2017/12/12 21:40:00 [显示全部帖子]

是的。下拉是字符型,实际值是整数型。但是我刚全改为字符型 也是一样，没用，只能下拉，选择时就没了
[此贴子已经被作者于2017/12/12 21:45:10编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
静听枫雨
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：255 积分：2152 威望：0 精华：0 注册：2013/6/8 22:41:00 		  发帖心情 Post By：2017/12/13 10:04:00 [显示全部帖子]

DataColChanged  


代码：


If e.DataCol.Name = "印色" Then '如果发生变化的是纸张名称列?

    '在产品表找出该产品

    Dim ys As DataRow

    ys = DataTables("颜色表").SqlFind("值 = " & e.DataRow("印色"))

    If ys IsNot Nothing '如果找到, 则设置各列内容

        e.DataRow("印色单价") = ys("单价")

       End If

End If



但是把这代码注释了，也一样，不行
[此贴子已经被作者于2017/12/13 10:09:56编辑过]
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03906 秒, 5 次数据查询