以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [讨论]用代码自定义列表项目不能选择是什么问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=110945)

--  作者:静听枫雨
--  发布时间:2017/12/12 18:13:00
--  [讨论]用代码自定义列表项目不能选择是什么问题
在窗口的ComboBox控件里  如果用属性里的自定义列表项目,正常。但通过下面的代码,即不能选择。是什么问题
Dim cmb As WinForm.ComboBox = e.form.Controls("印色")
cmb.ComboList = DataTables("颜色表").GetComboListString("颜色","","值")

--  作者:有点甜
--  发布时间:2017/12/12 18:15:00
--  

1、你颜色表,有没有数据?有可能没加载数据。

 

2、不能选择,是下拉没有内容还是不能修改值?

 

3、代码没问题的,实例发出来。


--  作者:静听枫雨
--  发布时间:2017/12/12 19:14:00
--  
颜色表 有内容,能下拉 但下拉后,不能选择,选后值为空白 
[此贴子已经被作者于2017/12/12 19:34:39编辑过]

--  作者:静听枫雨
--  发布时间:2017/12/12 20:08:00
--  
颜色表 有内容,窗口里的控件能下拉出来颜色, 但下拉后,不能选择,选后值为空白 
--  作者:有点蓝
--  发布时间:2017/12/12 20:32:00
--  
下拉的值和绑定的列类型不一致。
--  作者:静听枫雨
--  发布时间:2017/12/12 21:40:00
--  
是的。下拉是字符型,实际值是整数型。但是我刚全改为字符型 也是一样,没用,只能下拉,选择时就没了
[此贴子已经被作者于2017/12/12 21:45:10编辑过]

--  作者:有点甜
--  发布时间:2017/12/13 9:54:00
--  
以下是引用静听枫雨在2017/12/12 21:40:00的发言:
是的。下拉是字符型,实际值是整数型。但是我刚全改为字符型 也是一样,没用,只能下拉,选择时就没了
[此贴子已经被作者于2017/12/12 21:45:10编辑过]

 

你控件写了什么代码?你表事件datacolchanged、datacolchanging写了什么代码?有可能冲突了。


--  作者:静听枫雨
--  发布时间: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编辑过]

--  作者:有点甜
--  发布时间:2017/12/13 10:32:00
--  
请,上传具体实例测试。