以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- ListView数据传出 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=50041) |
-- 作者:qianqian1530 -- 发布时间:2014/4/28 13:22:00 -- ListView数据传出 双击 ListView的 一行以后, 打开另个窗口, 然后怎么传送数据呢? 双击事件:Forms("詳しく").show 窗口加载后: If Forms("快递").opened Then e.Form.Controls("Label15").text = Tables("快递_Table1").Current("操作記録") e.Form.Controls("Label16").text ListView? End If |
-- 作者:blackzhu -- 发布时间:2014/4/28 13:49:00 -- Dim lvw As WinForm.ListView = e.Form.Controls("ListView1") dim r as row = lvw.current if r isnot thing then forms("xxx").show end if 或者 if r.Name ="xxx" then \'判断当前的名称 forms("xxx").show end if
|
-- 作者:qianqian1530 -- 发布时间:2014/4/28 14:00:00 -- 不行... |
-- 作者:Bin -- 发布时间:2014/4/28 14:02:00 -- 代码要放到另外一个窗口AlterLoad事件 |
-- 作者:有点甜 -- 发布时间:2014/4/28 14:07:00 -- 楼主,你要传递ListView的什么数据?双击的那一行的数据?
数据又在新打开的窗口的哪里引用? |
-- 作者:qianqian1530 -- 发布时间:2014/4/28 14:13:00 -- 回复:(有点甜)楼主,你要传递ListView的什么数据?... 简单说就是, 在A窗口 双击ListView 某一行, 会打开B窗口 然后 A窗口ListView的某一行的某一个数据, 会传送到,B窗口的 TextBox1 里 |
-- 作者:qianqian1530 -- 发布时间:2014/4/28 15:06:00 -- 自己顶一下··· |
-- 作者:Bin -- 发布时间:2014/4/28 15:12:00 -- 看4楼 |
-- 作者:blackzhu -- 发布时间:2014/4/28 15:28:00 -- 我的代码怎么不行呢 不就双击打开窗口呀 |
-- 作者:有点甜 -- 发布时间:2014/4/28 15:29:00 -- 直接在afterload里面写入如下代码
If Forms("快递").opened Then Dim r As Row = Forms("快递").Controls("ListView1").Current
e.Form.Controls("Label15").text = r("第一列")
e.Form.Controls("Label16").text = r("第二列")
End If
|