- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]CheckedComboBox取值 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=81841)
-- 发布时间：2016/3/7 15:50:00
-- [求助]CheckedComboBox取值
求助：如何将复选组合框的值拆分开，分别使用。
Dim cc1 As WinForm.CheckedComboBox = e.Form.Controls("CheckedComboBox1")
Tables("表A").AddNew()
Tables("表A").Current("第一列") = "" & cc1.Value & ""
DataTables("表A").Save()
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目0307.table |
此主题相关图片如下：20160307a.jpg
[此贴子已经被作者于2016/3/7 15:50:21编辑过]
-- 发布时间：2016/3/7 15:57:00
--
Dim cc1 As WinForm.CheckedComboBox = e.Form.Controls("CheckedComboBox1")
For Each s As String In cc1.Value.split(",")
Dim nr As Row = Tables("表A").AddNew()
nr("第一列") = s
Next
DataTables("表A").Save()