Foxtable(狐表) → 用户栏目 → 专家坐堂 → 复选列表框


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

主题：复选列表框
帅哥哟，离线，有人找我吗？
deliangzhaoe
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：364 积分：3491 威望：0 精华：0 注册：2012/7/24 7:15:00 		复选列表框  发帖心情 Post By：2018/12/18 17:20:00 [只看该作者]

复选列表框的列表项目，能不能由表的一个单元格中的多行文字生成（这些行由回车键分隔），怎样写代码？
 回到顶部
帅哥哟，离线，有人找我吗？
y2287958
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐神 帖子：4649 积分：33901 威望：0 精华：0 注册：2008/8/31 22:44:00 		  发帖心情 Post By：2018/12/18 17:24:00 [只看该作者]

用集合拼一下

 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2018/12/18 17:50:00 [只看该作者]

参考代码

 

Dim str As String = "123" & vbcrlf & "abc"
str = str.replace(vbcrlf, "|")
列表项目控件.combolist = str
 回到顶部
帅哥哟，离线，有人找我吗？
deliangzhaoe
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：364 积分：3491 威望：0 精华：0 注册：2012/7/24 7:15:00 		  发帖心情 Post By：2018/12/18 18:44:00 [只看该作者]

单元格内容不是固定的，我做个实例，你看一下，谢谢
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:测试.foxdb
 回到顶部
帅哥，在线噢！
有点蓝
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107730 积分：547983 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：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
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：364 积分：3491 威望：0 精华：0 注册：2012/7/24 7:15:00 		  发帖心情 Post By：2018/12/19 16:26:00 [只看该作者]

这个已经实现了。
现在我想将这个checkedlistbox中选中的行文字，填入到另一个textbox中，怎么写代码？
选中时添加到texbox中；撤销选中时，texbox中的本行文字删除
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：2018/12/19 16:34:00 [只看该作者]

itemcheck事件，写代码，如

 

e.Form.controls("textbox1").text = e.sender.value
 回到顶部
帅哥哟，离线，有人找我吗？
deliangzhaoe
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：364 积分：3491 威望：0 精华：0 注册：2012/7/24 7:15:00 		  发帖心情 Post By：2018/12/19 19:37:00 [只看该作者]

checkedlistbox中所有的文字，不管是选中的还是没选中，点击添加按钮时，全部添加到表A的列5中，怎么写代码？现在用checkedlistbox的value属性，只能添加选中了的文字。
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：版主 帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00 		  发帖心情 Post By：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("|", ",")

 
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.07031 秒, 5 次数据查询