以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- CheckedListBox控件中取值进行动态排序 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=177775) |
-- 作者:蓝蚂蚁 -- 发布时间:2022/6/3 9:51:00 -- CheckedListBox控件中取值进行动态排序 “人员名单表“通过点击CheckedListBox控件中的选项进行动态排序,下面的代码哪里出现问题,谢谢老师! 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 If s > "" Then Tables("人员名单").sort =s End If
[此贴子已经被作者于2022/6/3 9:51:46编辑过]
|
-- 作者:狐狸爸爸 -- 发布时间:2022/6/3 10:17:00 -- messagebox.show(s) |
-- 作者:蓝蚂蚁 -- 发布时间:2022/6/3 17:46:00 -- messagebox.show(s),显示是列名,比如姓名,性别 |
-- 作者:狐狸爸爸 -- 发布时间:2022/6/5 7:37:00 -- 显示的列名,就没有问题,除非列名错了。 搞不定,就做个小例子发上来吧
|