主题：【求助】ListView

请问各位大神，用ListView显示表数据时，可以加个筛选按钮筛选数据??

 你需要重新生成listview内容。你控制好生成的内容即可。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.table

Dim lvw As WinForm.ListView = e.Form.Controls("ListView1")
lvw.Rows.Clear
Dim cls() As String = {"工号","姓名","性别","地址"} '定义列名
Dim txt As String = "%" & e.Form.Controls("TextBox1").text & "%"
Dim filter As String = "姓名 like '" & txt & "' or 性别 like '" & txt & "' or 地址 like '" & txt & "' or 工号 like '" & txt & "'"
For Each dr As DataRow In DataTables("员工信息").Select(filter) '从数据表中提取数据
    Dim vr As  WinForm.ListViewRow =  lvw.Rows.Add() '增加一行
    For Each cl As String In cls '逐列取值
        vr(cl) = dr(cl)
    Next
    If dr("性别") = "男" Then '设置分组
        vr.ImageKey = "Man"
    Else
        vr.ImageKey = "Woman"
    End If
    vr.Tag= dr '将DataRow赋值给ListViewRow的Tag属性,将二者联系起来
Next

请问以虚拟模式显示数据表的时候是不是不可以增加、删除等操作了？？？

示例十四窗口

 

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:listview示例.table