以文本方式查看主题

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

--  作者:huizhong
--  发布时间:2018/10/9 15:18:00
--  多选复选框问题
老师,求教下,以下代码是帮助文件,请问, 我如果不是自定义项目列表,而是固定数据表绑定,代码该如何改,当前代码执行后报错:“从类型“DataRowView”到类型“String”的转换无效。”
Dim ckl As WinForm.CheckedListBox = e.Form.Controls("CheckedListBox1")
Dim
 nms As New List(of String)
For
 i As Integer = 0 To ckl.Items.count - 1 \'获取已经勾选的列
    If ckl.GetItemChecked(i) Then
        nms.Add(ckl.Items(i))
    End 
If

Next
If
 nms.Count = 0 Then
    MessageBox.Show(
"
至少要选择一列","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    
Return

End
 If 

--  作者:有点甜
--  发布时间:2018/10/9 15:22:00
--  

nms.Add(ckl.Items(i))

 

改成

 

nms.Add(ckl.Items(i)("第一列"))