怎么让listview不显示当前被选中的行 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

怎么让listview不显示当前被选中的行

此主题相关图片如下：qq截图20170405150746.png

如果用listview 做了一个下拉窗口

怎么才能在才能在下拉窗口中隐藏当前行能

（下来内容都是当前表的内容，包括当前行）

listview的代码如下

Dim lvw As WinForm.ListView = e.Form.Controls("ListView1")

lvw.StopRedraw() '暂停绘制

lvw.Rows.Clear() '清除原来的行

lvw.Images.Clear() '清除原来的图片

'lvw.View = ViewMode.SmallIcon

lvw.CheckBoxes=True

'lvw.View = ViewMode.Tile '显示模式为平铺

lvw.view = ViewMode.LargeIcon

lvw.Images.LargeSize = New Size(100,100) '定义大图标尺寸

lvw.TitleSize = New Size(150,120) '设置平铺区域的大小

Dim cls() As String = {"ppp","cn_name"} '定义列名

For i As Integer = 0 To cls.Length - 1 '增加列

Dim c As WinForm.ListViewColumn = lvw.Columns.Add()

c.Name = cls(i) '指定列名

For Each dr As DataRow In DataTables("商品").Select("[gongxiang] =1") '从数据表中提取数据

' Dim Key As String = ProjectPath & "images\aaa\" & dr("ppp")'

Dim Key As String = "e:\as2\" & dr("ppp")'

lvw.Images.AddLargeImage(Key, Key) '添加照片,直接用文件名作为图片键值

Dim vr As WinForm.ListViewRow = lvw.Rows.Add() '增加一行

vr.ToolTipText = dr("cn_name") '设置此行的动态提示

vr.ImageKey = Key '设置图片键值

For Each cl As String In cls '逐列取值

vr(cl) = dr(cl)

vr.tag = dr

lvw.ResumeRedraw() '恢复绘制

不显示当前被选中的行是什么意思？没有看明白

假设表格中红色行开始向下6行分别对应下拉框中的6个图片

表格里的红色行对应的图片是下拉框里的第一个图片依次类推

当选中红色行的时候，下拉框中不显示第一个图片

选中红色行下面的行下拉框不显示第二个图片

表格和listview绑定的都是同一个数据表。

所以当图片的id 和当前行的id 相同时

在下拉框中隐藏表格中被选中的行id 对应的图片。

加上判断

If dr("id") <> Tables("表A").Current("id") Then

End If

怎么隐藏呢？因为当前行是隐藏的。换行后还是要显示的。

listview不是很懂，帮助已经翻了10遍了。

For Each dr As DataRow In DataTables("商品").Select("[gongxiang] =1") '从数据表中提取数据

    If dr("id") <> Tables("表A").Current("id") Then
        ' Dim Key As String = ProjectPath & "images\aaa\" & dr("ppp")'
        Dim Key As String = "e:\as2\" & dr("ppp")'
        lvw.Images.AddLargeImage(Key, Key) '添加照片,直接用文件名作为图片键值
        Dim vr As WinForm.ListViewRow = lvw.Rows.Add() '增加一行
        vr.ToolTipText = dr("cn_name") '设置此行的动态提示
        vr.ImageKey = Key '设置图片键值
        For Each cl As String In cls '逐列取值
            vr(cl) = dr(cl)
        Next
        vr.tag = dr
    End If
Next

经过试验没有发现有什么区别啊？

就第一行选择的时候会隐藏当前列。

第二行开始又是原样啊

你的代码写在那个事件？表名有没有写对？

主题：怎么让listview不显示当前被选中的行