Foxtable(狐表)用户栏目专家坐堂 → [求助]在ListView1里面如何显示网页图片


  共有2904人关注过本帖树形打印复制链接

主题:[求助]在ListView1里面如何显示网页图片

帅哥哟,离线,有人找我吗?
188802386
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:629 积分:4927 威望:0 精华:0 注册:2014/2/25 15:50:00
[求助]在ListView1里面如何显示网页图片  发帖心情 Post By:2017/11/27 21:30:00 [显示全部帖子]

图片列存放的是图片网址,请问如何显示网页上的网址而不是本地的
Dim lvw1 As WinForm.ListView = e.Form.Controls("ListView1") '员工列表
Dim lvw2 As WinForm.ListView = e.Form.Controls("ListView2") '活动一参与者列表
Dim lvw3 As WinForm.ListView = e.Form.Controls("ListView3") '活动二参与者列表
Dim lvws() As Winform.ListView = {lvw1,lvw2,lvw3} '看看我们是怎样批量设置某组控件属性的
For Each lvw As WinForm.ListView In lvws
lvw.View = ViewMode.List
lvw.StopRedraw() '暂停绘制
lvw.Rows.Clear() '清除原来的行
lvw.Images.Clear() '清除原来的图片
lvw.View = ViewMode.LargeIcon '显示模式为 大图标
    lvw.Images.LargeSize = New Size(130,150) '定义大图标尺寸
    For Each dr As DataRow In DataTables("Image").DataRows '从数据表中提取数据
        Dim Key As String = dr("图片") '获取此员工的照片文件
        lvw.Images.AddLargeImage(Key, Key) '添加照片,直接用文件名作为图片键值
        Dim vr As WinForm.ListViewRow = lvw1.Rows.Add()
        vr.ImageKey = Key '设置图片键值
    Next
Next

 回到顶部
帅哥哟,离线,有人找我吗?
188802386
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:629 积分:4927 威望:0 精华:0 注册:2014/2/25 15:50:00
  发帖心情 Post By:2017/11/27 22:18:00 [显示全部帖子]

那请问,在从网上获取到图片网址后,如何设置为自动下载到本地呢

 回到顶部
帅哥哟,离线,有人找我吗?
188802386
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:629 积分:4927 威望:0 精华:0 注册:2014/2/25 15:50:00
  发帖心情 Post By:2017/11/28 9:41:00 [显示全部帖子]

我突然有个想法,不知道能实现不,就是 图片控件可以显示在线图片 那么如何实现在ListView示例22的例子里面插入图片控件呢 这样就可以动态显示在线图片了,但因为没这样的示例,我写不来,麻烦大侠们帮忙解决一下,谢谢

ListView

ListView


 回到顶部