以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  复选列表框  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=128942)

--  作者:deliangzhaoe
--  发布时间:2018/12/18 17:20:00
--  复选列表框
复选列表框的列表项目,能不能由表的一个单元格中的多行文字生成(这些行由回车键分隔),怎样写代码?


--  作者:y2287958
--  发布时间:2018/12/18 17:24:00
--  
用集合拼一下
--  作者:有点甜
--  发布时间:2018/12/18 17:50:00
--  

参考代码

 

Dim str As String = "123" & vbcrlf & "abc"
str = str.replace(vbcrlf, "|")
列表项目控件.combolist = str


--  作者:deliangzhaoe
--  发布时间:2018/12/18 18:44:00
--  
单元格内容不是固定的,我做个实例,你看一下,谢谢
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:测试.foxdb




--  作者:有点蓝
--  发布时间:2018/12/18 20:14:00
--  
例如:

Dim str As String = DataTables("表A").GetComboListString("公司目标","名称=\'雷达\'")
str = str.Replace(vbcr,"").Replace(vblf,"|")
Dim cbo As WinForm.ComboBox = e.Form.Controls("ComboBox1")
cbo.ComboList = str


--  作者:deliangzhaoe
--  发布时间:2018/12/19 16:26:00
--  
这个已经实现了。
现在我想将这个checkedlistbox中选中的行文字,填入到另一个textbox中,怎么写代码?
选中时添加到texbox中;撤销选中时,texbox中的本行文字删除

--  作者:有点甜
--  发布时间:2018/12/19 16:34:00
--  

itemcheck事件,写代码,如

 

e.Form.controls("textbox1").text = e.sender.value


--  作者:deliangzhaoe
--  发布时间:2018/12/19 19:37:00
--  
checkedlistbox中所有的文字,不管是选中的还是没选中,点击添加按钮时,全部添加到表A的列5中,怎么写代码?现在用checkedlistbox的value属性,只能添加选中了的文字。


--  作者:有点甜
--  发布时间:2018/12/19 21:38:00
--  
以下是引用deliangzhaoe在2018/12/19 19:37:00的发言:
checkedlistbox中所有的文字,不管是选中的还是没选中,点击添加按钮时,全部添加到表A的列5中,怎么写代码?现在用checkedlistbox的value属性,只能添加选中了的文字。

 

比如

 

e.Form.controls("textbox1").text = e.sender.combolist.replace("|", ",")