标题：ListView以平铺方式显示员工的照片以及详细信息

1楼

nxdx112 发表于：2024/5/23 16:26:00

ListView以平铺方式显示员工的照片以及详细信息：1 怎样信息居中显示，而不是靠左 2 怎样设置信息的颜色

lvw.Columns("班级1").TextAlign = HorizontalAlignment.Center 不起作用

此主题相关图片如下：01.png

http://www.foxtable.com/webhelp/index.htm?page=0814.htm

2楼

有点蓝 发表于：2024/5/23 16:35:00

无法控制

3楼

nxdx112 发表于：2024/5/24 9:07:00

http://www.foxtable.com/webhelp/index.htm?page=0814.htm

分组显示数据，现在 RowActivate 想单击时，下面对应的表能筛选出对应的人的数据 ，下面的代码没有任何反应，应该如何修改

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

Dim vr As WinForm.ListViewRow = lvw.Current '获取ListView的当前行

If vr Is Nothing Then '如果不存在当前行,也就是内有选定任何一行

Return

End If

Dim dr As DataRow = vr.tag '获取此行对应的DataRow

Tables("学生信息").filter = "性别='男' and 学生姓名='" & dr("学生姓名") & "'"

4楼

有点蓝 发表于：2024/5/24 9:10:00

调试看看

msgbox("性别='男' and 学生姓名='" & dr("学生姓名") & "'")

5楼

nxdx112 发表于：2024/5/24 9:19:00

Object reference not set to an instance of an object.

6楼

有点蓝 发表于：2024/5/24 9:23:00

生成listview的时候要注意绑定tag：http://www.foxtable.com/webhelp/topics/2782.htm

If dr("性别") = "男" Then '设置分组
        vr.ImageKey = "Man"
    Else
        vr.ImageKey = "Woman"
    End If
    vr.Tag= dr '将DataRow赋值给ListViewRow的Tag属性,将二者联系起来
Next

7楼

nxdx112 发表于：2024/5/24 9:32:00

谢谢，就是没有

vr.Tag= dr '将DataRow赋值给ListViewRow的Tag属性,将二者联系起来

共7 条记录, 每页显示 10 条, 页签: [1]