Foxtable(狐表)用户栏目专家坐堂 → listview 的问题


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

主题:listview 的问题

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


加好友 发短信
等级:五尾狐 帖子:1062 积分:9781 威望:0 精华:0 注册:2012/3/13 5:23:00
listview 的问题  发帖心情 Post By:2017/2/12 13:11:00 [显示全部帖子]

Dim lvw As WinForm.ListView = Forms("分类").Controls("ListView1")
Dim vls As String = ""
For Each vr As WinForm.ListViewRow In lvw.SelectedRows
      vls = vls & "," & vr("商品")
Next
vls = vls.Trim(",")
If vls > "" Then

 Dim vb As WinForm.ListViewRow = lvw.Current
  vb("lei")="aa"

Else
    MessageBox.show("你并没有选择任何国家!" )
End If

我想在 红色的部分实现
被选中的行的  lei= “bbb”
同时隐藏显示 被选中的图片  

请问应该怎么写
是写在button按钮里的
非常感谢。


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


加好友 发短信
等级:五尾狐 帖子:1062 积分:9781 威望:0 精华:0 注册:2012/3/13 5:23:00
  发帖心情 Post By:2017/2/12 18:13:00 [显示全部帖子]

.NET Framework 版本:2.0.50727.8745
Foxtable 版本:2015.12.22.1
错误所在事件:窗口,分类,Button2,Click
详细错误信息:
未将对象引用设置到对象的实例。



Dim lvw As WinForm.ListView = Forms("分类").Controls("ListView1")
Dim vls As String = ""
Dim ls As new List(of Integer)
For Each vr As WinForm.ListViewRow In lvw.SelectedRows
    vls = vls & "," & vr("商品")
这个地方我想要的是 e.datarow(“lei”)= “bbb”    and   隐藏当前图片。
    If lei= "bbb" Then
        ls.add(vr.Index)
    End If

Next
vls = vls.Trim(",")
If vls > "" Then
    For i As Integer = ls.count-1 To 0 Step -1
        lvw.rows(i).Delete
    Next
Else
    MessageBox.show("你并没有选择任何国家!" )
End If


[此贴子已经被作者于2017/2/12 18:50:27编辑过]

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


加好友 发短信
等级:五尾狐 帖子:1062 积分:9781 威望:0 精华:0 注册:2012/3/13 5:23:00
  发帖心情 Post By:2017/2/12 18:51:00 [显示全部帖子]


[此贴子已经被作者于2017/2/12 18:52:10编辑过]

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


加好友 发短信
等级:五尾狐 帖子:1062 积分:9781 威望:0 精华:0 注册:2012/3/13 5:23:00
  发帖心情 Post By:2017/2/12 18:58:00 [显示全部帖子]

好像不行 显示下面的错误




.NET Framework 版本:2.0.50727.8745
Foxtable 版本:2015.12.22.1
错误所在事件:窗口,分类,Button2,Click
详细错误信息:
未将对象引用设置到对象的实例。




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


加好友 发短信
等级:五尾狐 帖子:1062 积分:9781 威望:0 精华:0 注册:2012/3/13 5:23:00
  发帖心情 Post By:2017/2/12 23:10:00 [显示全部帖子]

还是显示同样的错误



先点button3

在点button2

还是
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:upload1029.foxdb


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20170213000614.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:11111111.png
图片点击可在新窗口打开查看
如图,第5行的图片都被选中。
点button2后 

1  这5个图片对应的行的 lei列的值 =ccc
2  这5个图片在界面上隐藏(不代表要删除数据)



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


加好友 发短信
等级:五尾狐 帖子:1062 积分:9781 威望:0 精华:0 注册:2012/3/13 5:23:00
  发帖心情 Post By:2017/2/13 9:06:00 [显示全部帖子]

非常感谢,可以了。

button3 我想分页显示可以实现么?
按照帮助在afterload里加了代码 好像不行,还望多多指点
[此贴子已经被作者于2017/2/13 9:08:02编辑过]

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


加好友 发短信
等级:五尾狐 帖子:1062 积分:9781 威望:0 精华:0 注册:2012/3/13 5:23:00
  发帖心情 Post By:2017/2/13 10:32:00 [显示全部帖子]

我把 button3的内容复制到afterload事件
后面加了e.Form.Controls("btnShow").PerformClick 

按照帮助做了样式

提示未将对象引用设置到对象的实例。

难道翻页只能按照表单形式显示么?

[此贴子已经被作者于2017/2/13 10:32:58编辑过]

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


加好友 发短信
等级:五尾狐 帖子:1062 积分:9781 威望:0 精华:0 注册:2012/3/13 5:23:00
  发帖心情 Post By:2017/2/13 11:11:00 [显示全部帖子]

当然加了啊
其他的按钮也加了

 回到顶部