[求助]从后台生成复选列表框的值? Post By:2013/3/7 11:45:00 [显示全部帖子]
Dim chk As WinForm.CheckedListBox = e.form.Controls("CheckedListBox1") Dim Arys As List(Of String()) Arys = DataTables("SFMX").GetUniqueValues("编号","客户","品名") For Each Ary As String() In Arys chk.items.Add(ary(0) & "," & ary(1) & "," & ary(2)) Next End If