- 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=107518)
-- 发布时间：2017/9/29 15:07:00
-- 【求助】listview怎么不显示图片
求助为什么不显示图片呀？
Dim lvw As WinForm.ListView = e.Form.Controls("ListView1")
lvw.Groups.Clear() \'清除原来的分组
lvw.Rows.Clear() \'清除原来的行
lvw.Images.Clear() \'清除原来的图片
lvw.View = ViewMode.LargeIcon \'用大图标模式
Dim Multi As String = DataTables("全景菜单").GetComboListString("分组名称")
Dim Values() As String
Values = Multi.split("|")
For Index As Integer = 0 To Values.Length - 1
Dim vg As WinForm.ListViewGroup = lvw.Groups.Add() \'增加分组
vg.Name = values(Index) \'指定分组名称
vg.Text = values(Index) \'指定分组标题
For Each R As DataRow In DataTables("全景菜单").Select(" 分组名称 = \'" & Values(Index) & "\' ")
Dim it As WinForm.ListViewRow = lvw.Rows.Add()
it.Group = r("分组名称") \'归纳分组
it.Text = r("分列名称")
it.ImageKey = r("图标地址")
Next
Next
此主题相关图片如下：阿里旺旺图片20170929150418.jpg
-- 发布时间：2017/9/29 15:09:00
--
不能直接引用图片字典的内容。
你要根据其值【1、2、3】这些，对应的找到图片文件的路径，然后设置路径进去，才行。