主题：[求助]将CheckedListBox选定的值保存到列

在这个事件设置代码：

http://www.foxtable.com/help/topics/0965.htm

代码为：

Dim s As String
Dim l As WinForm.CheckedListBox = e.Form.Controls("CheckedListBox1")
For Each Index As Integer In l.CheckedIndices
    If s > "" Then
        s = s & ","
    End If
     s = s &  & l.Items(Index)
Next
Tables("表名").Current("级别") = s

人家有点甜让你做个例子，直接帮你写好，你都不愿意，这样好的人，你去哪里找呢？

问题回复的质量和速度，多数是后取决于你提问的质量，有的时候，也有必要配合一下想帮你的人。