Dim tr As WinForm.TreeView = e.Form.Controls("TreeView1")
Dim nd As WinForm.TreeNode = tr.SelectedNode
Dim lv1 As WinForm.ListView = e.Form.Controls("ListView1")
lv1.StopRedraw() '暂停绘制
lv1.Rows.Clear() '清除原来的行
lv1.Images.Clear() '清除原来的图片
lv1.View = ViewMode.LargeIcon '显示模式为大图标
lv1.Images.LargeSize = New Size(65,75) '定义大图标尺寸
Dim drs As List ( of DataRow ) = DataTables("部门表").Select("[部门编码] = '" & nd.FullName & "'")
For Each dr As DataRow In drs '从数据表中提取数据
Dim vr As WinForm.ListViewRow = lv1.Rows.Add() '增加一行
Dim Key As String = dr("照片") '获取此员工的照片文件
lv1.Images.AddLargeImage(Key, Key) '添加照片,直接用文件名作为图片键值
vr.ImageKey = key
vr.Tag = dr '建立和数据表中行的对应
vr.name = dr("身份证号") '设置标题
vr.Text = dr("姓名") '设置标题
If dr("性别") = "女" Then '设置分组
vr.text = vr.text & "(女)"
End If
Next
上述 dr("照片") 是一个包含网络路径的字符串。
如果该字符串 = "张三.jpg",代码执行和显示没有任何问题。
如果该字符串是“/员工档案/开发者/员工照片/张三.jpg”,这是 一个网络数据源的路径,listview却显示不出来照片。
请问如何修改代码?
[此贴子已经被作者于2019/6/13 12:06:51编辑过]