Foxtable(狐表)用户栏目专家坐堂 → [求助]如何删除ListBox中的项目?


  共有8049人关注过本帖树形打印复制链接

主题:[求助]如何删除ListBox中的项目?

帅哥哟,离线,有人找我吗?
红颜
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:254 积分:1963 威望:0 精华:0 注册:2013/2/6 19:09:00
[求助]如何删除ListBox中的项目?  发帖心情 Post By:2013/3/8 16:28:00 [显示全部帖子]

Dim lst As WinForm.ListBox = e.form.Controls("ListBox1")
Dim Count As Integer = DataTables("SFMX").Compute("Count(ZT)","DY = 0")
If Count > 0 Then
    Dim Arys As List(Of String())
    Arys = DataTables("SFMX").GetUniqueValues("", "BH","BRXM","MC")
    For Each Ary As String() In Arys
        lst.items.Add(ary(0) & "," & ary(1) & "," & ary(2))
    Next
End If

 

上面代码放在窗口按钮中,没按一次,就会生成重复的项目。如何在点击按钮后先清空ListBox中的项目items,然后再生成新的项目。


图片点击可在新窗口打开查看此主题相关图片如下:未命名.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2013-3-8 16:57:54编辑过]

 回到顶部