以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 图片显示问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=69255) |
-- 作者:HJG_HB950207 -- 发布时间:2015/6/2 11:16:00 -- 图片显示问题 职工一览表,有姓名,性别,照片列。现在想用LISTview 窗口只显示男同志姓名及照片 使用Tables("职工一览表").Filter = "[性别] = \'男\'"好像不行,结果还是显示的全部照片。 请问对如下代码如何修改: Dim lvw As WinForm.ListView = e.Form.Controls("ListView1") lvw.StopRedraw() lvw.Rows.Clear() lvw.Images.Clear() lvw.View = ViewMode.LargeIcon lvw.Images.LargeSize = New Size(78,98) \'For Each dr As DataRow In DataTables("职工一览表").DataRows \' For Each dr As DataRow In DataTables("职工一览表").Select("","_SORTKEY") Dim Key As String = dr("照片") lvw.Images.AddLargeImage(Key, Key) Dim vr As WinForm.ListViewRow = lvw.Rows.Add() vr.Text = dr("姓名") vr.ImageKey = Key Next lvw.ResumeRedraw()
|
-- 作者:Bin -- 发布时间:2015/6/2 11:21:00 -- For Each dr As DataRow In DataTables("职工一览表").Select("[性别] = \'男\'","_SORTKEY") 在这里加才有用哦
|
-- 作者:HJG_HB950207 -- 发布时间:2015/6/2 11:22:00 -- 谢谢了!!! |