标题：窗口中datalist里加显示复选框后代码这么写

打勾前：

此主题相关图片如下：窗口中datalist里加显示复选框后代码这么写？.jpg

打勾后：

此主题相关图片如下：窗口中datalist里加显示复选框后代码这么写+？.jpg

没明白是什么意思。

如果是希望利用复选框来设置审核列的内容，用datalist实现不了，你应该用“表”控件。

如果是这个要求应该很简单吧。

是这样么

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.table

Dim dst As WinForm.DataList = Forms("pzsh").Controls("DataList1")
if 复选框 被选中（即：打勾） then
datatables("flxsb").绑定表的同一行的("审核")列= "*" 
end if

【怎么表达？】

原兄：是这样，谢谢 知道了！～

这样可能对减少使用资源好一更点

Dim dst As WinForm.DataList = e.Form.Controls("DataList1")
Dim dr as DataRow = dst.Current
Dim dr1 As Integer = Tables("表名").FindRow(dr)
dst.SetChecked(dr1, True)
dr("审核") = true

有个问题： 关闭窗口又重新打开这个窗口后，所有已选内容全部又清空了？

AfterLoad事件代码

Dim dst As WinForm.DataList = e.Form.Controls("DataList1")
For Index As Integer = 0 To dst.Count - 1
    Dim dr As DataRow = dst.GetDataRow(Index)
    If dr("审核") = true Then
        dst.SetChecked(Index, True)
    End If
Next