ListView双击任意图片怎么获取的是表的最后一行记录？？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → ListView双击任意图片怎么获取的是表的最后一行记录？？

共有2845人关注过本帖树形打印复制链接主题：ListView双击任意图片怎么获取的是表的最后一行记录？？

kmbn

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：286 积分：1926 威望：0 精华：0 注册：2017/7/20 19:46:00

ListView双击任意图片怎么获取的是表的最后一行记录？？ 发帖心情

Post By：2018/7/1 14:24:00 [显示全部帖子]

For Each dr As DataRow In DataTables("S102").DataRows

Dim Key As String = dr("影片URL")

e.Form.Controls("Panel2").Basecontrol.controls("mplayer").url = key

e.Form.Controls("Panel2").Basecontrol.controls("mplayer").ctlcontrols.play

ListView双击任意图片怎么获取的是表的最后一行记录？？，想要获取到双击图片的对应表中的行

请老师指点

kmbn

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：286 积分：1926 威望：0 精华：0 注册：2017/7/20 19:46:00

Post By：2018/7/3 19:18:00 [显示全部帖子]

看了例子后，已经解决问题了，代码“vr.Tag= dr '将DataRow赋值给ListViewRow的Tag属性,将二者联系起来”是写了的，但是不会设置Dim lvw As WinForm.ListView = e.Form.Controls("ListView1")
Dim vr As WinForm.ListViewRow = lvw.Current '获取ListView的当前行
If vr Is Nothing Then '如果不存在当前行,也就是内有选定任何一行
Return
End If
Dim dr As DataRow = vr.tag '获取此行对应的DataRow

研究例子后就可以了

但是又遇到一个问题TreeView怎么与数据表互动，像ListView一样呢!

请老师指点

kmbn

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：286 积分：1926 威望：0 精华：0 注册：2017/7/20 19:46:00

Post By：2018/7/4 10:16:00 [显示全部帖子]

双击TreeView支点获取该支点对应表的某一行的某一字段

请老师指点

下一主题 >> << 上一主题

主题：ListView双击任意图片怎么获取的是表的最后一行记录？？