Foxtable(狐表)用户栏目专家坐堂 → 求助


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

主题:求助

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


加好友 发短信
等级:婴狐 帖子:76 积分:598 威望:0 精华:0 注册:2013/8/7 7:35:00
求助  发帖心情 Post By:2014/2/26 23:13:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:nupa24g}nrmdj%s3zxtjao.jpg
图片点击可在新窗口打开查看
如上图,用LISTview 显示的图片,怎么才能光显示后面最后一个-5的全部图片,或者光显示-7的所有图片。我做的都是全部显示。

 

高手能说详细点吗?基础不好。谢谢了。


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


加好友 发短信
等级:婴狐 帖子:76 积分:598 威望:0 精华:0 注册:2013/8/7 7:35:00
  发帖心情 Post By:2014/2/27 0:31:00 [显示全部帖子]

在线等了两小时,怎么没人给回复的?郁闷,急啊,在线等.


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


加好友 发短信
等级:婴狐 帖子:76 积分:598 威望:0 精华:0 注册:2013/8/7 7:35:00
  发帖心情 Post By:2014/2/27 11:59:00 [显示全部帖子]

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(130,150) '定义大图标尺寸
For Each dr As DataRow In DataTables("配方信息表").DataRows    '从数据表中提取数据
    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() '恢复绘制lvw.ResumeRedraw() '恢复绘制

 

 

我都是帮助那里粘过来的.不知道怎么改才能光显示-后面的花型.帮帮忙啊.


 回到顶部
帅哥哟,离线,有人找我吗?
永不言弃
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:76 积分:598 威望:0 精华:0 注册:2013/8/7 7:35:00
  发帖心情 Post By:2014/2/27 14:02:00 [显示全部帖子]

谢谢狐爸.看来是基础没掌握好.假如要设置*-5,比5大的所有数据,怎么做啊.我自己都问的不好意思了.

 回到顶部