以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  多值字段问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=137327)
--  作者：nxqtxwz
--  发布时间：2019/7/3 15:13:00
--  多值字段问题

多值字段的选择框中如何显示两列内容？比如：

 

 张三 

 天津  
李四  上海 
王五   北京
赵高 宁夏
小三  河北 
--  作者：有点蓝
--  发布时间：2019/7/3 15:18:00
--  
无法显示。要自己做下拉窗口，类似：http://www.foxtable.com/webhelp/topics/2478.htm
--  作者：nxqtxwz
--  发布时间：2019/7/3 16:02:00
--  

1、表中有姓名和住址列；

2、姓名列输入待选人姓名要不同住址用不同颜色显示。

请问老师有没有解决的办法？
--  作者：有点蓝
--  发布时间：2019/7/3 16:03:00
--  
参考：http://www.foxtable.com/webhelp/topics/0656.htm
--  作者：nxqtxwz
--  发布时间：2019/7/3 16:44:00
--  
以下是引用有点蓝在2019/7/3 16:03:00的发言：
参考：http://www.foxtable.com/webhelp/topics/0656.htm

老师您好，您给的例子是表中的数据用不同的颜色显示，我要问的是在输入姓名的下拉复选框中将姓名用不同颜色显示出来。
--  作者：有点蓝
--  发布时间：2019/7/3 16:55:00
--  
系统默认的下拉复选框是无法做任何改动的。除非参考2楼自己做下拉窗口
--  作者：nxqtxwz
--  发布时间：2019/7/3 17:04:00
--  
以下是引用有点蓝在2019/7/3 16:55:00的发言：
系统默认的下拉复选框是无法做任何改动的。除
不想做成目录树形式，怎么才能做出用不同颜色显示的多选框呢？
--  作者：有点蓝
--  发布时间：2019/7/3 17:10:00
--  
下拉窗口是自己设计的，窗口里面想放什么控件都可以呀，比如表格：http://www.foxtable.com/webhelp/topics/2116.htm
--  作者：nxqtxwz
--  发布时间：2019/7/3 17:34:00
--  
以下是引用有点蓝在2019/7/3 16:03:00的发言：
参考：http://www.foxtable.com/webhelp/topics/0656.htm

老师您好，想在这个例子的基础上把目录树改成用复选框来进行多选，但代码怎么改呢？本人水平低，写不了这么复杂的代码，请老师帮忙，谢谢。

代码1：

Dim s As String  = e.Form.DropDownBox.Value
Dim nms As new List(of String)
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")    原来是目录树，现在改成复选框，但有几十个复选框怎么改呢？
If s > "" Then
    nms.AddRange(s.Split(","))
End If
For Each nd As WinForm.TreeNode In trv.AllNodes
    nd.Checked = nms.Contains(nd.text)
Next

 

代码2：

Dim s As String
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
For Each nd As WinForm.TreeNode In trv.AllNodes
    If nd.Checked Then
        s = s & "," & nd.Text
    End If
Next
e.Form.DropDownBox.Value = s.trim(",")
e.Form.DropDownBox.CloseDropdown
--  作者：有点蓝
--  发布时间：2019/7/3 17:41:00
--  
如果需要使用颜色和多列显示，请使用表格控件，开启复选功能：http://www.foxtable.com/webhelp/topics/1635.htm