以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- ListView以平铺方式显示员工的照片以及详细信息 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=192013) |
-- 作者:nxdx112 -- 发布时间:2024/5/23 16:26:00 -- ListView以平铺方式显示员工的照片以及详细信息 ListView以平铺方式显示员工的照片以及详细信息:1 怎样信息居中显示,而不是靠左 2 怎样设置信息的颜色 lvw.Columns("班级1").TextAlign = HorizontalAlignment.Center 不起作用
|
-- 作者:有点蓝 -- 发布时间:2024/5/23 16:35:00 -- 无法控制 |
-- 作者: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("学生姓名") & "\'" |
-- 作者:有点蓝 -- 发布时间:2024/5/24 9:10:00 -- 调试看看 msgbox("性别=\'男\' and 学生姓名=\'" & dr("学生姓名") & "\'") |
-- 作者:nxdx112 -- 发布时间:2024/5/24 9:19:00 -- Object reference not set to an instance of an object. |
-- 作者:有点蓝 -- 发布时间: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 |
-- 作者:nxdx112 -- 发布时间:2024/5/24 9:32:00 -- 谢谢,就是没有 vr.Tag= dr \'将DataRow赋值给ListViewRow的Tag属性,将二者联系起来
|